http://www.perlmonks.org?node_id=479105


in reply to rewinding an input filehandle

You can use seek, e.g. seek F,0,0 to reset to the beginning of the file.
chas