Image::Magick::Thumbnail::create problem

[wapboy]

I am using a script based on the example from [url]www.cpan.org[/url] for
Image::Magick::Thumbnail:-
#!/usr/bin/perl -w
use CGI qw(:all);

print header;
use Image::Magick;
use Image::Magick::Thumbnail;
my $input_file="source.jpg";
my $thumbnail_name="source_tn.jpg";
my $thumbnail_size=50;

my $src = new Image::Magick;
$src-Read($input_file);#read the original image


# Create the thumbnail from it, where the biggest side is
$thumbnail_size px
my ($thumb,$x,$y) =
Image::Magick::Thumbnail::create($src,$thumbnail_s ize);

$thumb-Write($thumbnail_name);# Save the thumbnail in the current
directory

I am getting the following error:-
Use of uninitialized value in numeric gt () at
C:/Perl/site/lib/Image/Magick/Thumbnail.pm line 48.

This error happens in
Image::Magick::Thumbnail::create($src,$thumbnail_s ize);
I'm running this on Windows 98.

Can anyone help me with this one?

Thanks

Paul


--
wapboy

[John M. Gamble]

In article <wapboy.1cyubn@news.webfrustration.com>,
wapboy <wapboy.1cyubn@news.webfrustration.com> wrote:

>
>I am using a script based on the example from [url]www.cpan.org[/url] for
>Image::Magick::Thumbnail:-
>#!/usr/bin/perl -w
>use CGI qw(:all);
>
>print header;
>use Image::Magick;
>use Image::Magick::Thumbnail;
>my $input_file="source.jpg";
>my $thumbnail_name="source_tn.jpg";
>my $thumbnail_size=50;
>
>my $src = new Image::Magick;
>$src-Read($input_file);#read the original image
>
>
># Create the thumbnail from it, where the biggest side is
>$thumbnail_size px
>my ($thumb,$x,$y) =
>Image::Magick::Thumbnail::create($src,$thumbnail_ size);
>
>$thumb-Write($thumbnail_name);# Save the thumbnail in the current
>directory
>
>I am getting the following error:-
>Use of uninitialized value in numeric gt () at
>C:/Perl/site/lib/Image/Magick/Thumbnail.pm line 48.
>
>This error happens in
>Image::Magick::Thumbnail::create($src,$thumbnail_ size);
>I'm running this on Windows 98.
>

What's the version of your Image::Magick module, and what version
of ImageMagick are you using?

--
-john

February 28 1997: Last day libraries could order catalogue cards
from the Library of Congress.

[wapboy]

John M. Gamble Wrote:

> What's the version of your Image::Magick module, and what version
> of ImageMagick are you using?
>
>

I downloaded these modules sometime ago and I'm not certain how I tell
the version, but it looks like it is:-
Image::Magick 5,46,0,0
Image::Magick::Thumbnail 0.01

Thanks

Paul


--
wapboy

[John M. Gamble]

In article <wapboy.1d4ebm@news.webfrustration.com>,
wapboy <wapboy.1d4ebm@news.webfrustration.com> wrote:

>
>John M. Gamble Wrote:

>> What's the version of your Image::Magick module, and what version
>> of ImageMagick are you using?
>>
>>

>
>I downloaded these modules sometime ago and I'm not certain how I tell
>the version, but it looks like it is:-
>Image::Magick 5,46,0,0
>Image::Magick::Thumbnail 0.01
>
>Thanks
>
>Paul
>

Hmph. You're more advanced than me.

I'm afraid that I don't see anything obvious at the moment.

--
-john

February 28 1997: Last day libraries could order catalogue cards
from the Library of Congress.

[John M. Gamble]

In article <wapboy.1cyubn@news.webfrustration.com>,
wapboy <wapboy.1cyubn@news.webfrustration.com> wrote:

>
>I am using a script based on the example from [url]www.cpan.org[/url] for
>Image::Magick::Thumbnail:-
>#!/usr/bin/perl -w
>use CGI qw(:all);
>
>print header;
>use Image::Magick;
>use Image::Magick::Thumbnail;
>my $input_file="source.jpg";
>my $thumbnail_name="source_tn.jpg";
>my $thumbnail_size=50;
>
>my $src = new Image::Magick;
>$src-Read($input_file);#read the original image

Wait a minute. Is this copied directly from your script? If
so, what's this "$src-Read(..." line doing there? Likewise
the "$thumb-Write(..." line below.

Is this a side-effect of your cut-and-paste, or is it actually
written that way in your code?

>
>
># Create the thumbnail from it, where the biggest side is
>$thumbnail_size px
>my ($thumb,$x,$y) =
>Image::Magick::Thumbnail::create($src,$thumbnail_ size);
>
>$thumb-Write($thumbnail_name);# Save the thumbnail in the current
>directory
>
>I am getting the following error:-
>Use of uninitialized value in numeric gt () at
>C:/Perl/site/lib/Image/Magick/Thumbnail.pm line 48.
>
>This error happens in
>Image::Magick::Thumbnail::create($src,$thumbnail_ size);
>I'm running this on Windows 98.
>
>Can anyone help me with this one?
>
>Thanks
>
>Paul
>
>
>--
>wapboy

--
-john

February 28 1997: Last day libraries could order catalogue cards
from the Library of Congress.