Image-Similar
view release on metacpan or search on metacpan
examples/gd.pl view on Meta::CPAN
#!/home/ben/software/install/bin/perl
use warnings;
use strict;
use Image::Similar 'load_image';
use GD;
my $gd = GD::Image->newFromPng ("t/images/chess/chess-100.png");
my $is = load_image ($gd);
( run in 2.300 seconds using v1.01-cache-2.11-cpan-39bf76dae61 )