perl でオブジェクト指向を目指し、use strictしたプログラムを徹底していくと、どうにかしたくなるのが「ファイルハンドル」の存在です。 open(FD, "test.txt"); close(FD); この FD をオブジェクトとして使い関数に対して引数として与えたりしたいのですが、use strict な環境では my $fh = 'FD'; open($fh, "test.txt"); close($fh); とやっても、エラーになってしまいます。かと言ってこのためだけに no strict refs; ともしたくない。またこの方法では、Perlをマルチスレッド動作させるとき、ファイルディスクリプタの名前空間が衝突し、ファイルが開けなくなる問題もあります。 ネットで情報を漁っていると、こういうときはファイルハンドルを動的生成する方法が紹介されています。 use FileHan