NAME
Chart::Clicker::Decoration::Legend::Tabular - Tabular version of Legend
VERSION
version 2.81
SYNOPSIS
my $cc = Chart::Clicker->new;
my $series1 = Chart::Clicker::Data::Series->new;
my $series2 = Chart::Clicker::Data::Series->new;
$cc->legend(Chart::Clicker::Decoration::Legend::Tabular->new(
header => [ qw(Name Min Max) ],
data => [
[ min(@{ $series1->values }), max(@{ $series1->values }) ],
[ min(@{ $series2->values }), max(@{ $series2->values }) ]
]
));DESCRIPTION
Chart::Clicker::Decoration::Legend::Tabular draws a legend on a Chart with tabular data display.
The Tabular legend is a legend with a few extra attributes that allow you to pass it data to display. The attributes are c<header> and c<data>. The header (optional) allows you to specify the strings to display at the top of the table and the data attribute allows you to pass in arrayrefs of strings for display aside each of the series.
Note: The first string in the header arrayref should be the header for the column above the name of the series. This code does not do anything to verify that you've given the appropriate counts of data. It is expected that you will provide data with one arrayref for every series, each containing n elements. Having that, header will expect n + 1 elements with one for the series name and the remaining (n) matching the number of elements in each of data's arrayrefs.
ATTRIBUTES
border
Set/Get this Legend's border.
color
Set/Get the color to use as the foreground for the legend.
data
Set/Get the data for this legend. Expects an arrayref of arrayrefs, with one inner arrayref for every series charted.
font
Set/Get the font used for this legend's items.
header
Set/Get the header data used for this legend. Expects an arrayref of Strings.
insets
Set/Get this Legend's insets.
item_padding
Set/Get the padding for this legend's items.
METHODS
has_header
Predicate returning true of this legend has a header, else 1.
AUTHOR
Cory G Watson <gphat@cpan.org>
COPYRIGHT AND LICENSE
This software is copyright (c) 2012 by Cold Hard Code, LLC.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.