Select Code to Download

   open (my $in,"<$file") or die "Can't open file '$file' for reading:
+ $!";
   open (my $out,">$file.out") or die "Can't open file '$file.out' for
+ writing: $!";

Unsuccessful open on filename containing newline at test.pl line 18

use strict;
use warnings;
...
   }
}
close(DFFILE);