my $image = Image::Magick->new(magick=>'jpg');

open my $fh, '<', \$imgdata or die $!;
$image->Read(file=>$fh);
# - or -
$image->BlobToImage($imgdata);