Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

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

Comment on Resize Iamge with GD not Magick
Re: Resize Iamge with GD not Magick
by lemming (Priest) on Jun 17, 2001 at 09:09 UTC
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. :)

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://89132]
Approved by root
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (16)
As of 2014-08-27 21:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (253 votes), past polls