Select Code to Download

open IN,'<',$matchfile or die "Could not open $matchfile\n";
open OUT,'>>,$outfile or die "Could not open $outfile\n";

foreach my $file (@files) {
  foreach my $file2 (<IN>) {