in reply to Re: Re: Resizing images without Image::Magick
in thread Resizing images without Image::Magick
http://search.cpan.org/author/LDS/GD-2.01/GD.pm if you need help.sub resize { use GD; my($data, @size) = @_; my $image = GD::Image->newFromJpegData($data, 1); my @isize = $image->getBounds(); my $new_image = GD::Image->new(@size, 1); $new_image->copyResampled($image,0,0,0,0,@size,@isize); return $new_image->jpeg(75); }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: Re: Re: Resizing images without Image::Magick
by waswas-fng (Curate) on Aug 25, 2002 at 21:02 UTC | |
by xtype (Deacon) on Aug 27, 2002 at 13:49 UTC |