Imager::CountColor - demonstrates writing a simple function using Imager.

Imager documentation Contained in the Imager distribution.

Index

Code Index:

NAME

Top

Imager::CountColor - demonstrates writing a simple function using Imager.

SYNOPSIS

Top

  use Imager;
  use Imager::CountColor;
  my $im = Imager->new(...); # some Imager image
  ...; # some sort of manipulation
  print count_color($im, $color_object);

DESCRIPTION

Top

This module is a simple demonstration of how to create an XS module that works with Imager objects.

You may want to copy the source for this module as a start.

SEE ALSO

Top

Imager, Imager::Filter::DynTest

AUTHOR

Top

Tony Cook <tonyc@cpan.org>

Imager documentation Contained in the Imager distribution. 
package Imager::CountColor;
use strict;
use Imager;
use vars qw($VERSION @ISA @EXPORT_OK);
require Exporter;
@EXPORT_OK = 'count_color';

BEGIN {
  $VERSION = "0.01";
  @ISA = qw(Exporter);
  
  eval {
    require XSLoader;
    XSLoader::load('Imager::CountColor', $VERSION);
    1;
  } or do {
    require DynaLoader;
    push @ISA, 'DynaLoader';
    bootstrap Imager::CountColor $VERSION;
  };
}

1;

__END__