Help for this page

Select Code to Download


  1. or download this
    my $font = '/usr/share/fonts/dejavu/DejaVuSans-Bold.ttf';
$graph->set_values_font($font, 12);
  2. or download this
    #!/usr/bin/perl
# page.cgi
...
<h1>Global Mail Statistics</h1>
<img src = "bargraph.cgi"></center>!;
print end_html;
  3. or download this
    #!/usr/bin/perl
# bargraph.cgi
...
$graph->plot($data) or die $graph->error;
binmode STDOUT;
print $graph->gd->png;