NAME

Graphics::Primitive::Driver::GD - GD driver for Graphics::Primitive

SYNOPSIS

            

              
              
use Graphics::Primitive::Component;
use Graphics::Primitive::Driver::GD;
my $container = Graphics::Primitive::Container->new(
    width => $form->sheet_width,
    height => $form->sheet_height
);
$container->border->width(1);
$container->border->color($black);
$container->padding(
    Graphics::Primitive::Insets->new(top => 5, bottom => 5, left => 5, right => 5)
);
my $comp = Graphics::Primitive::Component->new;
$comp->background_color($black);
$container->add_component($comp, 'c');
my $lm = Layout::Manager::Compass->new;
$lm->do_layout($container);
my $driver = Graphics::Primitive::Driver::GD->new;
$driver->draw($container);
$driver->write('/Users/gphat/foo.png');
            
          

WARNING

This module is in it's early stages and does not work properly. It will be improved shortly.

AUTHOR

Cory G Watson, <gphat at cpan.org>

ACKNOWLEDGEMENTS

COPYRIGHT & LICENSE

Copyright 2009 Cory G Watson.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.