Graph with perl

[senget76]

Hi I am looking for suggestion here I need to draw a graph from a set of data that I have I try to look at Perl MagicK, but not really getting the answer Could somebody give me a suggestion or tutorial I am willingly add your link to my homepage later on :)

edited: Wed Aug 14 15:11:52 2002 by jeffa - fixed title typo

[grummerX]

Take a look at GD::Graph.

-- grummerX

[hacker]

Something like..

use strict;
use GD::Graph::bars;
use GD::Graph::colour;
use GD::Graph::Data;

my $data = GD::Graph::Data->new([["1st","2nd","3rd","4th",
                                  "5th","6th","7th", "8th"],
                                 [ 1, 2, 5, 6, 3, 1.7, 1, 3], 
]) or die GD::Graph::Data->error;

my $graph = GD::Graph::bars->new();

$graph->set(
    x_label         => 'X Axis',
    y_label         => 'Y Axis',
    title           => 'Enron Stock Valuations',
    y_max_value     => 8,
    y_tick_number   => 8,
    y_label_skip    => 2,
    bar_spacing     => 4,
    shadow_depth    => 4,
    shadowclr       => 'steelblue',
    transparent     => 0,
)
or warn $graph->error;

print STDOUT header("image/jpeg");
binmode STDOUT;
print STDOUT $my_graph->plot($data)->jpeg();

There's also a bunch of other people here who have asked related questions.

[Hanamaki]

Take a look at GraphViz.pm, too.

Edited: ~Wed Aug 14 22:29:15 2002 (GMT) by footpad: Replaced <A HREF> tag with [cpan://] tag, per Consideration.