Hi, yeah I see it too, only I get this error if using my @features=.....

*** glibc detected *** /usr/bin/perl: double free or corruption (!prev
+): 0x000000000076a710 ***
[download]

and if I use my $feature = ....; print $feature; I get

-nan
Segmentation fault
[download]

Here is a working test code snippet if anyone cares to try it on their system. It must be an IM bug.

#!/usr/bin/perl
use warnings;
use strict;
use Image::Magick;

my $image = Image::Magick->new(
   size => "600x600",
              );
$image->Read("xc:white");
$image->Draw(
   primitive => 'line',
   points    => "300,100 300,500",
   stroke    => '#600',
);

$image->Set(magick=>'jpg');                                           
+         
my $blob = $image->ImageToBlob();


my $image1 = Image::Magick->new(magick=>'jpg');
$image1->BlobToImage( $blob );
#$output->Resize(geometry=>'160x120');


my($width, $height, $format) = $image1->Get('width', 'height', 'format
+');
print "$width" . "x" . "$height\t$format image.\n"; # works


# different errors depending on left side structure
my @features = $image1->Features(1); # <--- silent segfault here
print "@features\n";

#my $features = $image1->Features(1); # <--- silent segfault here
#print "$features\n";

$image1->Write( $0.'.jpg');
[download]