After a quick google search, I have found a couple options. Use ImageMagick (there is a Perl module for it) or perhaps use the module Image::Compare.

I am sure there are a lot more ways but I am too lazy to list them others may be better suited to help you in this area.