On Dec 5, 2007 11:05 AM, Radu State <[EMAIL PROTECTED]> wrote: > # Humberto J. Abdelnur (Ph.D Student) # > > # Radu State (Ph.D) # > > # Olivier Festor (Ph.D) # > lol......
"wow" is all i can say to this.. let me enlighten you on the basics of Perl > $text = ''; > http://perldoc.perl.org/functions/my.html if you understood perl you would see that this line shows your complete lack of ability as $text could be declared as its used in the loop to demonstrate such amazing techniques such as declaring variables properly i will demonstrate this code die ($!) unless open my $file,'<',"/etc/passwd"; my @b = <$file>; while(my $a = shift @b){ print $a; } notice the "my $a" ... please take a few minutes to reflect on this code as your fragile phd minds can only handle so much but soon it will come to you > while (not $text =~ /^SIP\/2.0 100(.\r\n)*/ ){ > from perlretut ( http://perldoc.perl.org/perlretut.html ) "The sense of the match can be reversed by using !~ operator: print <http://perldoc.perl.org/functions/print.html> "It doesn't match\n" if "Hello World" !~ /World/;" Understanding that you do not know how to code i will make it easier for you: "while ($text !~ /^SIP\/2.0 100(.\r\n)*/ ){"
_______________________________________________ Full-Disclosure - We believe in it. Charter: http://lists.grok.org.uk/full-disclosure-charter.html Hosted and sponsored by Secunia - http://secunia.com/