in reply to read a file twice...

$ perldoc -f seek

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