my @match= whatever   if whyever;

##</code><code>##

chomp( my @lines= <FH> );
return map qr/$_/, @lines;

##</code><code>##

return map {
    chomp( my $line= $_ );
    qr/$line/;
} <FH>;