print "line $_ differs. File 1: $file1[ $_ ] != File 2: $file2[ $_ ]\n" for $comp->full_compare(\@file1,\@file2);