File::Compare - 比較檔案或檔案控制代碼
use File::Compare;
if (compare("file1","file2") == 0) {
print "They're equal\n";
}
File::Compare::compare 函式比較兩個來源的內容,來源可以是檔案或檔案控制代碼。它預設從 File::Compare 匯出。
File::Compare::cmp 是 File::Compare::compare 的同義詞。它只會在要求時從 File::Compare 匯出。
File::Compare::compare_text 逐行比較兩個檔案。一旦偵測到差異,就會停止。compare_text() 接受一個選用的第三個參數:這必須是行比較函式的程式碼參考,當兩行被視為相等時,會回傳 0。例如
compare_text($file1, $file2)
基本上等於
compare_text($file1, $file2, sub {$_[0] ne $_[1]} )
File::Compare::compare 及其相關函式會在檔案相等時回傳 0,檔案不相等時回傳 1,或在遇到錯誤時回傳 -1。
File::Compare 是由 Nick Ing-Simmons 編寫。其原始文件是由 Chip Salzenberg 編寫。