Select Code to Download

for my $file (@files) {
  open my $fh, '<', $file or die "$file: $!";
...
  }
  close $fh;
}