Thread sparklines und perl (5 answers)
Opened by Ronnie at 2005-10-20 00:19

Ronnie
 2005-10-20 00:19
#5866 #5866
User since
2003-08-14
2022 Artikel
BenutzerIn
[default_avatar]
Sparklines sind kleine Charts in HTML eingebettet mit Base64 codiert, wie in http://www.ietf.org/rfc/rfc2397.txt beschrieben. Zuerst habe ich diese Implementierung für RoR gefunden: http://nubyonrails.topfunky.com/article....or-ruby

Mehr dann unter:
http://bitworking.org/news/Sparklines_in_data_URIs_in_Python
http://redhanded.hobix.com/inspect/sparklinesForMinimalists.html

Da mir die Idee gut gefallen hat, habe ich erst mal ein kleines Skript geschrieben um zu sehen ob die Implementierung so schnell und schmutzig möglich ist, wie ich mir das vorgestellt habe:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
#!/usr/bin/perl

use strict;
use warnings;

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

use MIME::Base64;

my @data = (
["1st","2nd"],
[ 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,',
encode_base64($gd->png),
'" alt="sparkline"/>';

Das tut es, aber ist nicht so schön wie der Ansatz des RoR-Moduls. Es hat mich verwundert das es noch kein entsprechendes Perl-Modul im CPAN gibt, GD::Graph::sparklines mal ausgenommen, das auf line-Charts beschränkt ist?!

View full thread sparklines und perl