ActivePerl 5.10.1 build 1006
ImageMagick 6.5.8 Q16
PerlMagick installed using the ImageMagick installer
Par::Packer 0.991 installed from the bribes repository using ActivePerl's ppm GUI
I don't really know if I should be talking to you guys or the PPM people. Regardless, here's what I'm doing:
To package my script, I'm doing:
Code: Select all
set %im%="C:\Program Files\ImageMagick-6.5.8-Q16"
Code: Select all
pp -v -o pjchecker.exe -l %im%\CORE_RL_magick_.dll -l %im%\X11.dll -l %im%\CORE_RL_zlib_.dll -l %im%\CORE_RL_bzlib_.dll -l %im%\CORE_RL_lcms_.dll -l %im%\CORE_RL_ttf_.dll -l %im%\modules\coders\IM_MOD_RL_gif_.dll -l %im%\modules\coders\IM_MOD_RL_png_.dll -l %im%\ImageMagickObject.dll -l %im%\msvcr90.dll -l %im%\msvcp90.dll -l %im%\mfc90.dll -l %im%\vcomp90.dll -l %im%\atl90.dll -l %im%\modules\coders\IM_MOD_RL_magick_.dll pjchecker.pl
Code: Select all
X:\>pjchecker.exe Screenshot.png
Opening image... Exception 420: NoDecodeDelegateForThisImageFormat `Screenshot.png' @ constitute.c/ReadImage/530
Press <Enter> or <Return> to exit
Code: Select all
print "Opening image... ";
my $image = Image::Magick->new;
my $result = $image -> Read($filename);
if ($result) {
quitit( $result );
}
print "Done.\n";