Tk::Chart - Daten in Diagrammen darstellen

Irgendwann braucht man es: Daten als Tortendiagramm, als Balkendiagramm, eine Entwicklung als Linie, die schön nach oben zeigt. Tk::Chart ist das Perl/Tk-Modul dafür. Es setzt auf einer Canvas auf und bietet nette Funktionen wie Zoom und allerlei Balkendiagramme. Und das Beste: in der Distribution auf CPAN gibt es einen Ordner demo, der die ganzen Diagramme zeigt. Einfach das ganze Modul auf CPAN als ZIP runterladen, entpacken und anschauen. Die Bilder der verschiedenen Diagramm-Typen gibt es auch hier.


Nachfolgendes Beispiel zeigt das beliebte Tortendiagramm

#!/usr/bin/perl
use strict;
use warnings;
use Tk;

use Tk::Chart::Pie;
my $mw = MainWindow->new( -title => 'Tk::Chart::Pie example', );

my $chart = $mw->Pie(
  -title      => 'There are currently 231 CPAN mirrors around the World (20/09/2010 18:50:57).',
  -background => 'white',
  -linewidth  => 2,
)->pack(qw / -fill both -expand 1 /);

my @data = ( [ 'Europe', 'Asia', 'Africa', 'Oceania', 'Americas' ], [ 119, 33, 3, 6, 67 ], );

$chart->plot( \@data );

MainLoop();
Top