----- Original Message -----
From: "steve silvers" <[EMAIL PROTECTED]>
> I'm having problems getting this to work.
> Thanks in advance.
> Steve.
>
>
Try this:
use GD::Graph::pie;
print "Content-Type: image/png\n\n";
@data = (
["1st","2nd","3rd","4th","5th","6th"],
[ 4, 2, 3, 4, 3, 3.5]
);
$my_graph = new GD::Graph::pie( 250, 200 );
$my_graph->set(
title => 'A Pie Chart',
label => 'Label',
axislabelclr => 'black',
pie_height => 36,
transparent => 0,
);
my $format = $my_graph->export_format;
binmode STDOUT;
print $my_graph->plot(\@data)->$format();
Works fine for me on Apache/Win 2k.
The last 3 lines are straight out of 'perldoc gd::graph' :-)
Cheers,
Rob
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
