Help for this page

Select Code to Download


  1. or download this
    my $str = $_;
my $matched = scalar grep { $str =~ /$_/ } @regexes;