Help for this page
for my $word ("foo", "bar", "baz") { if ($line =~ /quux $word/o) {yada yada yada} }