Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

26 lines (18 sloc) 0.495 kb
package Imager::Filter::DynTest;
use strict;
use Imager;
use vars qw($VERSION @ISA);
BEGIN {
$VERSION = "0.02";
require XSLoader;
XSLoader::load('Imager::Filter::DynTest', $VERSION);
}
sub _lin_stretch {
my %hsh = @_;
lin_stretch($hsh{image}, $hsh{a}, $hsh{b});
}
Imager->register_filter(type=>'lin_stretch',
callsub => \&_lin_stretch,
defaults => { a => 0, b => 255 },
callseq => [ qw/image a b/ ]);
1;
Jump to Line
Something went wrong with that request. Please try again.