in reply to read a file twice...
$ perldoc -f seek [download]
For what it's worth, be sure to read how to use whence properly. I misread that part and I misused 'seek' for awhile.
Amel - f.k.a. - kel