my @strings = qw(ABC DEF GHI JKL);
my $regex = lc join '|', map "\Q$_\E", @strings;
$regex = qr/$regex/;

foreach my $file (@files) {
  my $data = slurp $file;
  if (lc($data) =~ $regex) {
    print " Match\n";
  }
}