8.22 2つのファイルの内容を比較する
- File::Compareモジュールを使用する
use File::Compare; if (compare($FILENAME_1, $FILENAME_2) == 0) { # 2つのファイルが等しい場合 } if (compare(*FH1, *FH2) == 0) { # 2つのファイルが等しい場合 } if (compare($fh1, $fh2) == 0) { # 2つのファイルが等しい場合 }
use File::Compare; if (compare($FILENAME_1, $FILENAME_2) == 0) { # 2つのファイルが等しい場合 } if (compare(*FH1, *FH2) == 0) { # 2つのファイルが等しい場合 } if (compare($fh1, $fh2) == 0) { # 2つのファイルが等しい場合 }