foreach my $line (@::FileLines) {
  next unless grep(...);

  my @karatSplit = ...
}