Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Resize Iamge with GD not Magick

by HTTP-404 (Sexton)
on Jun 17, 2001 at 08:28 UTC ( #89132=perlquestion: print w/replies, xml ) Need Help??
HTTP-404 has asked for the wisdom of the Perl Monks concerning the following question:

Hello sorry if it has ben already asked, nut after searching for a while i couldn't find andything from SuperSearch at last my isp installed GD for me i need to make few thumbnails, can anyone please give me exact code how do it with GD not Magick Thank You very much

Replies are listed 'Best First'.
Re: Resize Iamge with GD not Magick
by btrott (Parson) on Jun 17, 2001 at 09:35 UTC
    I don't think there's a direct 'resize' method, but there's a 'copyResized' method that you can use to copy one image into another, resizing it in the process. If you have a PNG file for which you want to create a thumbnail 1/3 the size of the original, for example, you could do this:
    use GD; my $big = GD::Image->newFromPng($png_file) or die "Can't load PNG $png_file: $!"; my($new_w, $new_h) = map { int($_/3) } $big->getBounds; my $small = GD::Image->new($new_w, $new_h); $small->copyResized($big, 0, 0, 0, 0, $new_w, $new_h, $big->getBou +nds); print $small->png;
    That's just an example. A sort-of tested example. :)
Re: Resize Iamge with GD not Magick
by lemming (Priest) on Jun 17, 2001 at 09:09 UTC

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://89132]
Approved by root
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (9)
As of 2017-11-22 19:42 GMT
Find Nodes?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:

    Results (327 votes). Check out past polls.