NAME

Imager::Graph::Column - a tool for drawing column charts on Imager images

SYNOPSIS

use Imager::Graph::Column;
use Imager::Font;

my $font = Imager::Font->new(file => '/path/to/font.ttf') || die "Error: $!";

my $graph = Imager::Graph::Column->new();
$graph->set_image_width(900);
$graph->set_image_height(600);
$graph->set_font($font);
$graph->use_automatic_axis();
$graph->show_legend();

my @data = (1, 2, 3, 5, 7, 11);
my @labels = qw(one two three five seven eleven);

$graph->add_data_series(\@data, 'Primes');
$graph->set_labels(\@labels);

my $img = $graph->draw() || die $graph->error;

$img->write(file => 'columns.png');