ファイルのコピー

　File::Copyモジュールのcopyを使用します。
　第1引数にコピー元、第2引数にコピー先を指定します。第3引数でコピーに使用するバッファサイズを指定することもできます。
　コピーに成功すると1、失敗すると0を返し、失敗時のエラーは$!にセットされます。

# hoge.txt を fuga.txt にコピーする
use File::Copy;

copy "hoge.txt", "fuga.txt" or die $!;

# ファイルハンドルから piyo.txt にコピーする
use File::Copy;
use FileHandle;

$fh = FileHandle->new("hoge.txt", "r");
if ($fh){
	binmode $fh;
	copy $fh, "piyo.txt" or die $!;
	$fh->close;
}

# hoge.txt を 標準出力にコピーする
use File::Copy;

copy "hoge.txt", \*STDOUT or die $!;

ファイルのコピー

関連項目