[PERL] problemen functie Ping met ImageMagick

[Verwijderd]

Ik ondervind problemen met de functie Ping van ImageMagick.
Deze functie zou mij de breedte, hoogte, groote en het formaat moeten terug geven van een plaatje. Echter geeft deze functie helemaal niets terug. Ik doe dus iets fout maar wat?

Dit script draait op een FreeBSD v5.3 test bak waarop Perl v5.8.6 is geinstalleerd. Ik heb de versies ImageMagick 5.5.7, ImageMagick 6.1.9 en ImageMagick 6.2.0 geprobeerd maar zonder resultaat.

Ik ben mij er van bewust dat de oudere versies van ImageMagic mij een string data terug geeft die komma gescheiden is. En de nieuwe versies een Array.

Hieronder een aantal testjes die ik geprobeerd heb, helaas alle zonder resultaat.

Perl:

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

$imageName = "/usr/home/danous/images/testimage_original.jpg";
$imageName = "/usr/home/danous/images/testimage_png.png";

my $image1 = new Image::Magick;
my ($width1, $height1, $size1, $format1) = $image1->Ping($imageName);
print "\nwidth: $width1\nheight: $height1\n";

my $image2 = Image::Magick->new;
$image2->BlobToImage($imageName);
my ($width2, $height2, $size2, $format2) = $image2->Get('width','height','filesize','format');
print "\nwidth: $width2\nheight: $height2\n";

my $image3 = Image::Magick->new;
my ($width3, $height3, $size3, $format3) = $image3->Ping($imageName);
print "\nwidth: $width3\nheight: $height3\n";

my $image4 = Image::Magick->new;
my ($width4, $height4, $size4, $format4) = $image4->Ping(blob=>$imageName);
print "\nwidth: $width4\nheight: $height4\n";

In het script gaat het om het vast stellen van het formaat. Ik hoop dat iemand voor mij een oplossing kan bieden. of eventueel een trap naar een andere methode