Help for this page
while (<>) { for my $p (qr/a+b/, qr/c+d/, qr/e+f/) { foo() if /$p/ } ... while (<>) { for my $s ('a+b', 'c+d', 'e+f') { foo() if /$s/ } }
www.com | www.net | www.org
No recent polls found
