>#! /hoge/hage/perl -w > >use strict; > >を強くお奨めします。 確かにつぎはぎだらけで、問題を多く含んでいると思います。 ご指摘有り難うございました。 再度、見直すところから取り組みたいと思います。