One relatively easy (but non-perl) solution could be to dump the information from the tables in the databases with bcp and then just do a diff on the files.