eliminate use vars
[imager.git] / Flines / Flines.pm
CommitLineData
88666683 1package Imager::Filter::Flines;
ee64a81f 2use 5.006;
88666683
TC
3use strict;
4use Imager;
88666683
TC
5
6BEGIN {
ee64a81f 7 our $VERSION = "0.04";
88666683 8
a5919365
TC
9 require XSLoader;
10 XSLoader::load('Imager::Filter::Flines', $VERSION);
88666683
TC
11}
12
13Imager->register_filter(type=>'flines',
14 callsub => sub { my %hsh = @_; flines($hsh{image}) },
15 defaults => {},
16 callseq => [ 'image' ] );
17
181;
19
20__END__
21
22=head1 NAME
23
24Imager::Filter::Flines - dim alternate lines to emulate a video display
25
26=head1 SYNOPSIS
27
28 use Imager;
29 use Imager::Filter::Flines;
30
31 $img->filter(type=>'flines');
32
33=head1 DESCRIPTION
34
5715f7c3 35This is an adaption of the C<flines> dynamically loadable filter
88666683
TC
36provided in dynfilt/ in previous releases of Imager.
37
38This filter has no parameters.
39
40=head1 AUTHOR
41
42Original by Arnar M. Hrafnkelsson.
43
5b480b14 44Adapted by Tony Cook <tonyc@cpan.org>
88666683
TC
45
46=head1 SEE ALSO
47
48Imager, Imager::Filters.
49
50=cut