Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot


by neniro (Priest)
on Oct 19, 2005 at 20:08 UTC ( #501403=snippet: print w/ replies, xml ) Need Help??
Description: Sparklines are something that I haven't seen mentioned on perlmonks so far. Sparklines are small graphs that are base64 encoded and embededded into plain html (see: for further details). There is already a module on cpan: GD::Graph::sparklines to build line-graphs as sparklines. My snippet is just a quick hack to show a way to build different kind of sparklines using GD and MIME::Base64 :

use strict;
use warnings;

use GD::Graph;
use GD::Graph::pie;

use MIME::Base64;

my @data = ( 
    [    1,    2],

my $graph = new GD::Graph::pie( 120, 120 );

$graph->set( dclrs       => [ qw( #FECECE #FEFECE #FFFFFF ) ],
             start_angle => 90 );

my $gd = $graph->plot(\@data) or die $graph->error;

print '<IMG SRC="data:image/png;base64,', 
      '" alt="sparkline"/>';

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: snippet [id://501403]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (6)
As of 2016-07-30 06:27 GMT
Find Nodes?
    Voting Booth?
    What is your favorite alternate name for a (specific) keyboard key?

    Results (265 votes). Check out past polls.