[% USE poly = GD.Polygon;
       poly.addPt(50,0);
       poly.addPt(99,99);
    %]

    [% FILTER null;
        USE im   = GD.Image(100,100);
        USE c    = GD.Constants;

        # allocate some colors
        white = im.colorAllocate(255,255,255);
        black = im.colorAllocate(0,  0,  0);
        red   = im.colorAllocate(255,0,  0);
        blue  = im.colorAllocate(0,  0,255);
        green = im.colorAllocate(0,  255,0);

        # make the background transparent and interlaced
        im.transparent(white);
        im.interlaced('true');

        # Put a black frame around the picture
        im.rectangle(0,0,99,99,black);

        # Draw a blue oval
        im.arc(50,50,95,75,0,360,blue);

        # And fill it with red
        im.fill(50,50,red);

        # Draw a blue triangle by defining a polygon
        USE poly = GD.Polygon;
        poly.addPt(50,0);
        poly.addPt(99,99);
        poly.addPt(0,99);
        im.filledPolygon(poly, blue);

        # Output binary image in PNG format
        im.png | stdout(1);
       END;
    -%]

The GD.Polygon plugin provides an interface to GD.pm's GD::Polygon class.

See GD for a complete description of the GD library and all the methods that can be called via the GD.Polygon plugin. See Template::Plugin::GD::Image for the main interface to the GD functions. See Template::Plugin::GD::Constants for a plugin that allows you access to GD.pm's constants.

Craig Barratt <[email protected]>

Lincoln D. Stein wrote the GD.pm interface to the GD library.

1.56, distributed as part of the Template Toolkit version 2.14, released on 04 October 2004.

Copyright (C) 2001 Craig Barratt <[email protected]>

The GD.pm interface is copyright 1995-2000, Lincoln D. Stein.

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

Template::Plugin, Template::Plugin::GD, Template::Plugin::GD::Image, Template::Plugin::GD::Constants, GD