• SYNOPSIS
• DESCRIPTION
• OPTIONS
• AUTHOR
• COPYRIGHT AND LICENSE

SYNOPSIS

    use Image::JpegTran;
    
    jpegtran 'source.jpg','result.jpg', rotate => 90, trim => 1, perfect => 1;
    jpegtran 'source.jpg','result.jpg', transpose => 1;
    jpegtran 'source.jpg','result.jpg', transverse => 1;
    jpegtran 'source.jpg','result.jpg', flip => 'horizontal';

DESCRIPTION

Use lossless jpeg transformations, like when using jpegtran utility, from Perl

OPTIONS

copy => 'none'

Copy no extra markers from source file

copy => 'comments'

Copy only comment markers

copy => 'all'

Copy all extra markers (comments and EXIF) (default)

optimize => 0 | 1

Optimize Huffman table (smaller file, but slow compression), default = 0

progressive => 0 | 1

Create progressive JPEG file (default = 0)

grayscale => 0 | 1

Reduce to grayscale (omit color data) (default = 0)

flip => 'horizontal' | 'vertical'

Mirror image (left-right or top-bottom)

rotate => 90 | 180 | 270

Rotate image (degrees clockwise)

transpose => 1

Transpose image

transverse => 1

Transverse transpose image

trim => 1

Drop non-transformable edge blocks or

perfect

Fail if there is non-transformable edge blocks

maxmemory => N

Maximum memory to use (in kbytes)

arithmetic => 1

Use arithmetic coding

  -restart N     Set restart interval in rows, or in blocks with B
  -verbose  or  -debug   Emit debug output
  -scans file    Create multi-scan JPEG per script file

AUTHOR

Mons Anderson, <mons@cpan.org>

COPYRIGHT AND LICENSE

The main part of this module is copyright (C) 1991-2010

The Independent JPEG Group's JPEG software

Thomas G. Lane, Guido Vollbeding.

See README.IJG