GD::Graph
Help and Information with Perl's GD::Graph moduleSitemap:
Sample Listsample11.plsample12.plsample13.plsample14.plsample15.plsample16.plsample17.plsample18.plsample19.plsample1A.plsample1B.plsample21.plsample22.plsample23.plsample31.plsample41.plsample42.plsample51.plsample52.plsample53.plsample54.plsample55.plsample56.plsample57.plsample61.plsample62.plsample63.plsample64.plsample71.plsample91.plsample92.plsample93.plsample95.pl |
sample22.plUse the left-hand navigation menu to view the other samples included in the GD::Graph package, or use the links at the top to view other sections of the website. Generated Chartsample22.gif: Code to generate these graphs:use GD::Graph::area;
require 'save.pl'; @data = ( ["1st","2nd","3rd","4th","5th","6th","7th", "8th", "9th"], [ 5, 12, 24, 33, 19, 8, 6, 15, 21], [ -1, -2, -5, -6, -3, 1.5, 1, 1.3, 2] ); my $name = 'sample22'; my $graph = GD::Graph::area->new; print STDERR "Processing $name\n"; $graph->set( two_axes => 1, zero_axis => 1, transparent => 0, ); $graph->set(rotate_chart => 1) if $name =~ /-h$/; $graph->set_legend( 'left axis', 'right axis' ); $graph->plot(\@data); save_chart($graph, $name); |
