Panotools-Script

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

    - enblend-svg, render just masks, use enblend-mask to merge
    - nona-mask, allow full command-line parameters
    - pto2fulla align_image_stack based tca calculator
    - ptoinfo hugin project reporting tool and gui wrapper
    - erect2planet output pto project instead of rendering image
    - read and write hugin image metadata and options in comment lines
    - remove pto2tiff-gui due to conflict with hugin_stitch_project
    - add .desktop files for Linux gui integration

0.11
    - replace Image::Magick with Image::Size for sizing images
    - jpeg2qtvr fix CRLF bug on windows
    - fix cubic2erect (Peter Crowley)

0.09
    - Stitch() method, fix stupid bug introduced by trying to fix windows bugs

0.08
    - tif2svg uses autotrace to generate initail vector masks
    - enblend-svg converts to tiff and runs enblend rather than enblend-mask
    - tif2svg and enblend-svg support creating jpg proxy images

bin/entile  view on Meta::CPAN

#!/usr/bin/perl
use strict;
use warnings;
use Image::Magick;

my $image = new Image::Magick;
$image->Read (shift);

my $path_prefix = shift || 't';

my $pix_tile = shift || 256;

my ($pix_width, $pix_height) = $image->Get ('width', 'height');

my $pix_size = 1;
$pix_size *= 2 while ($pix_size < $pix_width || $pix_size < $pix_height);



( run in 0.630 second using v1.01-cache-2.11-cpan-beeb90c9504 )