use Image::Resize;
use autodie;

$src = "bigimage.jpg";
my $old = Image::Resize->new($src);
my $new = $old->resize(200, 300); # max dimensions

$jpegdata = $new->jpeg(95); # jpeg quality

open OUT, ">./smaller/$src";
print OUT $jpegdata;
close OUT;

See also:

1. installing from CPAN without root
2. Utf8 in web perl application (LAMP) – dbi, mysql
3. Utf8 in web perl application (LAMP) – binmode, charset

It looks quite ugly, like but is great source of information about perl, especially for beginners. Take for example this page: http://www.rocketaware.com/perl/onepage.htm – it list all that cryptic “Short-hand variables.”, and also functions and operators.

This page does not only seem to be old, it is old. For example this page: http://www.rocketaware.com/perl/perlfaq4/Why_aren_t_my_random_numbers_ran.htm points to http://www.perl.com/CPAN/doc/FMTEYEWTK/random , where you can read (at least now) that:

Note that the old documentation, often advertised as www.perl.com/doc or www.perl.com/CPAN/doc, has been removed from CPAN as of November 2001 because it had not been updated for several years”.

The documentation in not-so-archaic distributions of perl points to this place instead: http://www.cpan.org/misc/olddoc/FMTEYEWTK.tgz where the old docs are stored. The rocketaware site seem to not be aware of those year 2001 changes, and in footer one can read: “Copyright 2000, Forrest J. Cavalier III.”

So to sum op, this site is:
- old
- ugly
- useful (at least if you don’t mind using perl as it was year 2000)

The page http://www.rocketaware.com/perl/onepage.htm alone makes this website worth recommendation.

See also:

1. Masons and mason
2. Microsoft bots made DDoS on CPAN
3. Website login with Perl