You should say close(FILE2) and close(FILE), because close does not look at $_ to see what should be closed, it closes the currently selected filehandle ($_ gets clobbered in your while-loop, anyway).