The SYNOPSIS works great with qw(1 2 3 4 5). But if you replace each
seed number with 0, like:
my @data = map {SVG::Graph::Data::Datum->new(x => $_,y => $_^2)} qw(0
0 0 0 0);
When the code gets to print $g->draw;
You get back:
Illegal division by zero at
/opt/local/lib/perl5/site_perl/5.12.3/SVG/Graph/Glyph/axis.pm line 25.
After a bit of investigation, I found if the first 3 consecutive values
of either the x, y or z are identical, then you get the error.
I have set this ticket to "Critical" because this is a show-stopper, for
my current work. Please change the severity if I'm mistaken.
RT for rt.cpan.org