Hi,

maybe try to change this line:

open ($FH,'<',$fn);
[download]

to something like this:

open $FH, '<', $fn or die "Failed to open file $fh $!";
[download]

This way, you can ascertain the name of the file you were trying to open and figure out whether there is something wrong with the content of $fh.

Update (15:50 UTC): I see now that you're actually printing the file name right before, so what I suggested is useless. And also that you're using autodie. Never mind.