GD::Graph::Lines ... Controling some behavior...

Collapse
This topic is closed.
X
X
 
  • Time
  • Show
Clear All
new posts
  • TeraNews

    GD::Graph::Lines ... Controling some behavior...

    I have a sample graph using GD::Graph::Line s, it's a simple X-Y line graph
    (www.bitmosphere.com/cgi-bin/graph.pl) I want to change the color of the
    graph border, and the tick lines (vertical and horiziontal). I can't seem
    to find how to change them to: border being black, horiziontal lines being
    light gray dashed, and vertical being light gray. Anyone know if this is
    possible, or has done this?


    Code:
    #!/usr/bin/perl

    use CGI::Carp qw(fatalsToBrow ser);
    use CGI ':standard';
    use GD::Graph::line s;
    use strict;

    # Both the arrays should same number of entries.
    my @data = (['v1', 'v2','v3','v4', 'v5'],
    [30.5, 31, 31.04, 30.75, 33.01],
    [29.5, 30.25, 30.25, 30.2, 30.75 ]);

    my $mygraph = GD::Graph::line s->new(600, 300);
    $mygraph->set(
    x_label => 'X Axis',
    y_label => 'Y Axis',
    title => 'Chart Title',

    y_tick_number => 5,
    y_min_value => 29,
    y_max_value => 34,
    x_label_skip => 2,
    long_ticks => 1,

    # Draw datasets in 'solid', 'dashed' and 'dotted-dashed' lines
    line_types => [1, 1],

    # Set the thickness of line
    line_width => 1,

    # Set colors for datasets
    dclrs => ['blue', 'red'],
    ) or warn $mygraph->error;


    $mygraph->set_legend_fon t(GD::gdMediumB oldFont);
    $mygraph->set_legend('Li ne Type 1', 'Line Type 2');

    my $myimage = $mygraph->plot(\@data) or die $mygraph->error;

    print "Context-type: image/png\n\n";
    print $myimage->png;



    Thanks,
    Brian


Working...