avoid ignoring the result of i_io_getc()
[imager.git] / CountColor / CountColor.pm
CommitLineData
92bda632
TC
1package Imager::CountColor;
2use strict;
3use Imager;
4use vars qw($VERSION @ISA @EXPORT_OK);
5require Exporter;
6@EXPORT_OK = 'count_color';
7
8BEGIN {
a5919365 9 $VERSION = "0.02";
92bda632
TC
10 @ISA = qw(Exporter);
11
a5919365
TC
12 require XSLoader;
13 XSLoader::load('Imager::CountColor', $VERSION);
92bda632
TC
14}
15
161;
17
18__END__
19
20=head1 NAME
21
22Imager::CountColor - demonstrates writing a simple function using Imager.
23
24=head1 SYNOPSIS
25
26 use Imager;
27 use Imager::CountColor;
28 my $im = Imager->new(...); # some Imager image
29 ...; # some sort of manipulation
30 print count_color($im, $color_object);
31
32=head1 DESCRIPTION
33
34This module is a simple demonstration of how to create an XS module
35that works with Imager objects.
36
37You may want to copy the source for this module as a start.
38
39=head1 SEE ALSO
40
41Imager, Imager::Filter::DynTest
42
43=head1 AUTHOR
44
5b480b14 45Tony Cook <tonyc@cpan.org>
92bda632
TC
46
47=cut
48
49
50