Array::Diff könnte hilfreich sein. dafür musst du die dateien halt erst jeweils in ein array einlesen und diese dann an das modul verfüttern.
oder auch List::Compare