Hello list,
The qr example in the guide does not work as expected. Using the /o in the foreach loop matches based on the first value of $re and never changes even when $re is recompiled.
The /o modifier should be removed since that's exactly what we are trying to avoid.
http://perl.apache.org/docs/general/perl_reference/perl_reference.html#Compiled_Regular_Expressions
my $pat = '^foo$';
my $re = qr($pat);
foreach( @list ) {
print if /$re/o;
}Arshavir
