foreach my $str (@str) {
   $str =~ /$re1/;
   $str =~ /$re2/;
   ...
   $str =~ /$reN/;
}