Did you really run this program? I get (5.14.1):
break is part of given/when. The Perl equivalent to C's break would be last, but you probably meant next (C's continue)?Unquoted string "break" may clash with future reserved word at zut lin +e 33. Useless use of a constant (break) in void context at zut line 33. zut syntax OK
if (($leapString) =~ m/$vldbString/i) { $found = 1; break; # <-- here, the equivalent to 'break' would be 'last'; # but you probably meant 'next;' ? }
In reply to Re: Pattern Match is not working
by Perlbotics
in thread Pattern Match is not working
by Lancy
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |