1

Perl match pattern

view story
linux-howto

http://www.unix.com – Hi all, i have a peice of Perl script like this: Code: foreach (@line) {                 @tmp = split /;/,$_;                 #print "Line is: $_\n";                 switch($tmp[3]){                                 case m/p60/i {                                 push @p60, [ $tmp[1], $tmp[4] ];   & (HowTos)