foreach my $file (@files) {
  $file->{fh}->close();
}