ファイルハンドルを
my($IN) = *IN;のように変数に格納すると
used only once possible typoという警告が出るんですが
どこが間違っていますか？