in reply to Perl segfaults: Why?
What is the result of adding an integer to a filehandle?
Maybe this explains it?
open $fh, '<', 'junk.dat';; print $fh, $fh + 1;; GLOB(0x3d39d90) 64200081 [download]
Note: 0x3d39d90 => 64,200,080