Créer un fichier jpg depuis un plot => installer un nouveau module ?

Marsh Posté le 21-11-2008 à 11:57:17

Hello, j'ai l'expression suivante :

Code :

my @data = (
["tata", "titi" , "toto"],
[14, 15, 16 ]
);
my $graph = new GD::Graph::pie3d( 400, 300 );
$graph->set(
x_label => 'test1',
y_label => 'test2',
title => 'test3',
);
my $gd = $graph->plot( \@data );

Comment visualiser le résultat du plot ? (je lance mon fichier perl depuis le bash) Peut-on automatiser l'enregistrement du graph obtenu en fichier jpg ou png ou autre ?

Merci d'avance :jap:

---------------
Atari 520 ST 256 Ko

Marsh Posté le 21-11-2008 à 11:57:17

Marsh Posté le 21-11-2008 à 12:11:42

Trouvé :

open(GRAPH,">graph5.jpg" ) || die "Cannot open graph5.jpg: $!\n";
print GRAPH $graph->gd->jpeg(100);

Par contre, le résultat est super moche [:tinostar]

Vous auriez des idées pour générer de beaux graphiques 3d (histo, camemberts) avec du perl ?

---------------
Atari 520 ST 256 Ko

Marsh Posté le 24-11-2009 à 05:06:15

salut

moi j'utilise gnuplot
et je l'appelle en execution (system ou open)
Y'a pas mal d'options qui font que ca peut etre bien joli

---------------
La vie c'est comme une boite de chocolats, on ne sait jamais sur quoi on va tomber. (Forrest Gump)

Marsh Posté le 24-11-2009 à 15:01:47

Plutot que passer par un appel système dans son code, on peut aussi utiliser le module Chart::Gnuplot
http://search.cpan.org/~kwmak/Char [...] Gnuplot.pm
A+,

Message édité par gilou le 24-11-2009 à 15:02:07

---------------
There's more than what can be linked! -- Iyashikei Anime Forever! -- AngularJS c'est un framework d'engulé! --

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *