I mentioned FileHandle because in the OP, section "Original code", FileHandle is used. Of course IO::File would be the better choice,
but since reading is expensive, I pointed to the module at hand.
With eagerness one naturally ends up with IO::File, since the
first sentence in the DESCRIPTION section of FileHandle reads
NOTE: This class is now a front-end to the IO::* classes.
:-)
--shmem
_($_=" "x(1<<5)."?\n".q·/)Oo. G°\ /
/\_¯/(q /
---------------------------- \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}
| [reply]
[d/l] |
Sorry, I hadn't looked at the main program. Because in the OP already uses FileHandle is indeed a good reason. :)
| [reply] |