@words = ("filename" , "file.txt");
$line = "my file is file.txt";

##</code><code>##

$file = (grep{$line =~ /$_/i} @words)[0];

or

foreach (@words) {
  next if($line !~ /$_/i);
  $file = $_;
}