NAME
EPEG - Perl extension for EPEG
SYNOPSIS
use EPEG qw(:constants);
my $epg = new EPEG;
$epg->open_file( "test.jpg" );
$epg->resize( 150, 150, MAINTAIN_ASPECT_RATIO );
$epg->save( "test_resized.jpg" );
DESCRIPTION
Perl wrapper to the alarmingly fast jpeg manipulation library "Epeg".
Methods
new()
open_file( FILENAME )
open_data( DATA )
get_height()
get_width()
set_quality( [0-100] )
resize( WIDTH, HEIGHT, [Aspect Ratio Mode] )
save( FILENAME )
AUTHOR
Michael Curtis <mcurtis@yahoo-inc.com>
SEE ALSO
http://gatekeeper.dec.com/pub/BSD/NetBSD/NetBSD-current/pkgsrc/graphics/epeg/README.html