You should use Text::CSV for this, it's really fast and handles all the gotchas you might encounter, like headers and blanks, etc. It provides a getline_hr() method which returns a hash (keyed with your header names). You could use this to build two hashes to compare manually. Or try CSVDiff in CPAN.