Image::Resize::OpenCV - Simple image resizer using OpenCV
use Image::Resize::OpenCV; $image = Image::Resize::OpenCV -> new('large.jpg'); print ("WIDTH:" . $image -> width . " HEIGHT:" . $image -> height); $image -> resize(250, 250); $image -> save("small.jpg"); # OR use Image::Resize::OpenCV qw(image_resize); image_resize('large.jpg', 250, 250);
Image::Resize::OpenCV using openCV library for resize images. openCV more faster then GD, ImageMagick, GraphicsMagick etc. OpenCV more quality then GD and have 4 interpolation mode for resize images.
image_resize($filename, $width, $height, $out_filename = undef);
Create a new mage::Resize::OpenCV object my $image = new Image::Resize::OpenCV(); my $image = new Image::Resize::OpenCV($filename);
$image -> load($filename);
$image -> resize(640, 480); $image -> resize(640, 480, KEEP_ASPECT => 1); $image -> resize(640, 480, INTER => 1); $image -> resize(640, 480, KEEP_ASPECT => 1, INTER => 1); # INTER - Interpolation: # 0 - nearest-neigbor # 1 - bilinear # 2 - pixel area relation # 3 - bicubic
$image -> save('/tmp/11.jpg'); $image -> save('/tmp/11.jpg', 50);
http://sourceforge.net/projects/opencvlibrary/
Dmitry Kosenkov, <junker@front.ru>
Copyright (C) 2011 by Dmitry Kosenkov
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.14.1 or, at your option, any later version of Perl 5 you may have available.
To install Image::Resize::OpenCV, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Image::Resize::OpenCV
CPAN shell
perl -MCPAN -e shell install Image::Resize::OpenCV
For more information on module installation, please visit the detailed CPAN module installation guide.