>>125
君の知りたいことはここに載っていることかな?

http://perldoc.jp/docs/perl/5.6.1/perlfaq5.pod
の、
(どうすればファイルハンドルをサブルーチンに局所化できますか?