To add to phenom's recommendations, I'd also suggest letting Perl allocate the filehandle rather than hardcoding it, e.g. open my $fh, ...