(perl) Pinging a bad file and dying causes seg fault.
Posted: 2007-08-24T09:08:13-07:00
Hi!
I've tested this in Image::Magick 6.3.3. This program produces a segmentation fault when run.
TIA,
-daniel
I've tested this in Image::Magick 6.3.3. This program produces a segmentation fault when run.
TIA,
-daniel
Code: Select all
#!/usr/bin/perl
use Image::Magick;
my $image=Image::Magick->new();
open my $fh, '>', 'bad.jpg';
print $fh "WEEEEE";
close $fh;
# pings of very non-valid jpgs causes seg faults.
my @stuff = $image->ping('bad.jpg');
die "this causes a seg fault\n";