Not an Perl solution, but if you're on a Win32 platform, I highly recommend using a tool called BeyondCompare(http://www.scootersoftware.com/)...

Ok ok it's not free, but there is an eval version, and it has a lot of nifty features.