perlのファイルコピー、移動
copy:ファイルコピー
move:ファイル移動
#ファイルコピー use File::Copy; #ファイル存在チェック if(-e "ff.txt"){ print "ファイル存在\n"; copy("ff.txt","ff00.txt"); #ファイル移動 move("ff11.txt","./data/ff11.txt"); if(-e "ff00.txt"){ print "ファイルコピー完了\n"; } }else{ print "ファイル存在しない\n"; }