Help for this page
sub qre(&;@) { my $block = shift; my $str = $block->(@_); return qr/$str/; }
sub qre (&;$) { my $re = shift->(); ... __END__ (?^i:foo|bar)
www.com | www.net | www.org
No recent polls found