I tried this. I had to make some changes to get it to work, but this is as close as I could get. 
#!/usr/bin/perl

use strict;
use warnings;
use Chart::Clicker;
use Chart::Clicker::Context;
use Chart::Clicker::Data::DataSet;
use Chart::Clicker::Data::Marker;
use Chart::Clicker::Data::Series;
use Chart::Clicker::Renderer::Bar;
use Geometry::Primitive::Rectangle;
use Graphics::Color::RGB;

my $cc = Chart::Clicker->new(width => 500, height => 250);

my $series = Chart::Clicker::Data::Series->new(
        keys   => [ 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 ],
        values => [ 4, 5.6, 7.9, 9, 13, 17, 23, 35, 46, 50 ],
);

my $ds = Chart::Clicker::Data::DataSet->new(series => [$series]);

$cc->add_to_datasets($ds);

my $def = $cc->get_context('default');

my $area = Chart::Clicker::Renderer::Bar->new(opacity => .6);
$area->brush->width(3);
$def->renderer($area);
$def->range_axis->tick_values([qw(1 3 5)]);
$def->range_axis->label('Scores');
$def->range_axis->format('%d');
$def->domain_axis->tick_values([qw(2 4 6 8 10)]);
$def->domain_axis->label('Survey Questions');
$def->domain_axis->format('%d');
$def->domain_axis->fudge_amount(.05);

$cc->title->text('Dynamic Charting: Survey 1 - Front En +d '); 
$cc->title->font->size(20); 
$cc->title->padding->bottom(10);

$cc->write_output('Dynamic Charting: Survey 1.png');

[download]

In reply to Re: Chart::Clicker Question by Khen1950fx
in thread Chart::Clicker Question by Perobl

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.