It is recommended that we use the three arg use of open, but we should also check for failure:

open my $firstfile, '<', 'DFLOG1.txt' 
  or die "Can't open file $firstfile: $!";
[download]

Nice work on the code beyond my nit :)