サンプルコード # 指定された全てのファイルが存在していたら真，1つでも不足していたら偽を返すサブルーチン sub files_exist{ my(@list)= @_; my $num = @list; my $counter=0; foreach $fname(@list){ if (-f fname) { $counter++; } if($counter >= $num…

ディレクトリの一覧を取得して使う dirlist=`ls -F ./hoge | grep /` #./hogeのディレクトリ一覧を取得 for tmp in ${dirlist}do dirname=`echo ${tmp} | sed -e 's/\///'` #ディレクトリ名の最後にある/を消す #やりたい処理done 複数のファイルの存在確認 …