count me in.

Update: yeah right... got beaten up before I even got home to my linux machine to access GD... :p

Update 2: Ok so here is what I was working on, but I didn't post after I saw crazyinsomniac's results.

#!/usr/bin/perl -w
use strict;
use Chart::Plot;
 
my $img = Chart::Plot->new(600,400);

my @xdata = (1..30);
my @ydata = qw{
            10  1   -1  22  33  1   6   7   4   8
            9  34  112 -2  -12 33  22  33  1   6
            7  22  33  1   6   7   66  -66 0   1 };

$img->setData (\@xdata, \@ydata, 'Point Dashedline Red');
 
$img->setGraphOptions ('horGraphOffset' => 75,
                       'vertGraphOffset' => 100,
                       'title' => 'Chady\'s XP Change for June',
                       'horAxisLabel' => 'Days',
                       'vertAxisLabel' => 'XP Change' );
print $img->draw();

[download]

results can be seen here.

Update 3: following crazy's suggestion here's a simple mix of bars and lines.. but no 3D bars yet :-/

#!/usr/bin/perl -w

use strict;
use Chart::Composite;

my $img = Chart::Composite->new(600,400);
my @data = qw{
            10  1   -1  22  33  1   6   7   4   8
            9  34  112 -2  -12 33  22  33  1   6
            7  22  33  1   6   7   66  -66 0   1 };

$img->add_dataset (1..30);
$img->add_dataset (@data);
$img->add_dataset (@data);

$img->set ('legend' => 'none',
     'title' => 'Chady\'s XP Plot',
     'brush_size' => 2,
     'pt_size' => 10,
     'composite_info' => [ ['Bars', [1]],
                    ['LinesPoints', [2]] ],
    'y_label' => 'XP Change',
    'colors' => {'y_label' => [0,0,255],  
    'dataset0' => [0,153,153], 'dataset1' => [0,0,127]
        }
    );

$img->png("chart.png");

[download]
He who asks will be a fool for five minutes, but he who doesn't ask will remain a fool for life.

Chady | http://chady.net/

In reply to Fortune Fame, Mirror Vain... but the memory remains.... by Chady
in thread Fame, Fortune, ChicksStuds, and XP! by jcwren

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.