ファイルのコピー、移動 File::Copyモジュール

File::Copyモジュールを使ってファイルのコピー、移動を行っています。

#!/usr/bin/env perl
use strict;
use File::Copy

my $src_file = "file1";  #コピー元ファイル
my $dist_file = "file2"; #コピー先ファイル

# ファイルコピー
copy($src_file,$dist_file) or die $!
# ファイル移動
move($src_file,$dist_file) or die $!
スポンサードリンク