Algorithm-Accounting
view release on metacpan or search on metacpan
lib/Algorithm/Accounting/Report/GDGraph.pm view on Meta::CPAN
$self->save($img,$filename,$graph->export_format);
}
sub report_field_group_occurrence_percentage {
print STDERR "XXX: Fixme. I don't now how to draw group occurrence into graphs\n";
}
sub save {
my ($obj,$file,$format) = @_;
open(IMG, ">${file}.${format}") or die $!;
binmode IMG;
print IMG $obj->$format();
close IMG;
print STDERR "${file}.${format} saved\n";
}
__DATA__
=head1 NAME
Algorithm::Accounting::Report::GDGraph - generate graph report using GD
( run in 0.234 second using v1.01-cache-2.11-cpan-eab888a1d7d )