foreach (@file) {
  print FILE $_;
}