Reopening the same Perl file handle closes it first. He shouldn't be running out of file handles.