Search results for query: *

Hi All, I have recentrly d\l win32::gui module ver 0.0.670 and Im having some trouble. I have a combobox that i can't quite make visible wihout using option -style => 3 but the {-style} is deprecated in ver 0.0.670 + so my question is : what do i have to use to replace the {-style => 3} to...

never mind im blind thanks anyways

Hi All, Would anyone know how to simulate the Tk::LabFrame with Win32::GUI?? any help pointing me in the right direction is greatly appreciated ! thanks,

HEllo All, I was wondering if it was possible to simulate the 'right click menu' like in a Text box but in a LabEntry ? Basically just to copy, cut and paste Thanks.

Thanks guys, Now all I have to do is benchmark the 3 subs and see which one is more faster and less memory hogger. I will let you know the results.

Hi All, I made this for my int problem : my $a = 1234; my $R = VerifyInt($a); if ($R == 1) { # its an integer } sub VerifyInt { my @Int = split(//, $_[0]); foreach (@Int) { if (/[0-9]/) { next; } else { return 0; } } return 1; } If anyone has a better way...

For the float, I thought about that but then I ran into a problem : $a = '1.a'; pattern macthing wont help in this case. Isn't there someting like if ($a =~ /0-9/) or if ($a =~ [0-9]) or if ($a =~ /[0-9]/) that I can use ??

Hi All, I'm actually embarassed to ask this. I would like to know how can I know if the var is an integer or a float my $a = 1234; my $b = 0.1 I would like something like this : if ($a is an integer) { # code } elsif ($b is a float) { # code } else { # code } All help is...

You can always use this. $line = 'bla/bla/bla/bla.pl'; $line =~ m/([a-zA-Z0-9%:.\+\*\~\-_\s]+)\s*$/x; $line = $1; Hope this helps.

Try $check = 0; @postfix_check = `postfix check`; foreach (@postfix_check) { if (/fatal/i) { print "\nPostfix is broken\n"; $check = 1; last; } } print "\nPostfix file A OK\n" if ($check != 1); Hope this helps

Thanks raider2001. your rock !

Hi All, I'm having a problem with a regex to look for repeated characters in a string. there is about 10 000 00 different strings and i need to know how to look for any character that appears 3 times in the string. EX: my $a = 'abcabca'; something like if (char appears 3 times in $a) {...