ファイルをコピーする方法(Perl)


Perlでファイルをコピーする方法は以下のとおりです。
Windows環境ではcopyコマンドだけで問題なく動作したにも関わらず、Linuxだと期待した動作をしなかったため、メモを残しておきます。

  1. ファイルの存在確認をする
  2. openする
  3. closeする
  4. copyする

具体的なコードは以下のとおりです。

if(-e $temporaryFile){
    #file exists
} else {
    #file does not exists
    open(TMPFILE,">$temporaryFile") or die $!;
    close(TMPFILE);
}
copy($actualFile, $temporaryFile);

タグ:Perl


HOME2011年の記事ファイルをコピーする方法(Perl)

Yahoo!ブックマークに登録

[#]HOME [*]Search [0]PageTop

[HTML link code]
[PR]セール品検索もできるAmazon検索