Help for this page
my @patterns = qw(-[45j]{2} [1-3][a46]u); my $pat_string = join "|", @patterns; if ($MType =~ /^$pat_string/oi) { # do stuff }
www.com | www.net | www.org
No recent polls found