use GD;
$image = GD::Image->new($filename);
$index = $image->getPixel(20,100);
($r,$g,$b) = $myImage->rgb($index);
[download]