Comment puis-je utiliser un script perl pour créer/remplir et dessiner un graphe RRDTool

Question

Voici un exemple: ce script génère des données.

#!/opt/local/bin/perl 
use Data::Dumper; 
use strict; 

my $i=0; 
my $startTime=time; 
$startTime += $ARGV[0] + 5; 
my $dTime = localtime($startTime); 
print "\n##################\nLAUNCHING REQUESTS\n COUNT: $ARGV[0]\n DELAY: | 1 \nThe scripts will fire at : $dTime\n##################\n\n"; 
while ($ARGV[0] > $i) 
{ 
    $i++; 
    system("php avtestTimed.php $ARGV[0] $ARGV[2] $startTime"); 
    print "RUN system('php avtestTimed.php $ARGV[0] $ARGV[2] $startTime'); \n"; 
    sleep 1; 
} 

Le résultat sur la sortie standard est:

 
################## 
LAUNCHING REQUESTS 
COUNT: 5 
DELAY: | 1 
The scripts will fire at : Mon Dec 6 09:38:15 2010 
################## 


EXECUTING AT 0.00015100 1291646295 -- WITH SID 28a952711439a8f98e5acf807da3455c -- AGAINST test.yakabod.net 
RESPONSE RECEIVED FROM (https://test.yakabod.net/activityViewer/index.html) IN 1.5974318981171 
RUN system('php avtestTimed.php 5 test.yakabod.net 1291646295'); 

EXECUTING AT 0.35701200 1291646299 -- WITH SID 492cdb3e3893d1fa6ea1a6e8b4961087 -- AGAINST test.yakabod.net 
RESPONSE RECEIVED FROM (https://test.yakabod.net/activityViewer/index.html) IN 1.5956890583038 
RUN system('php avtestTimed.php 5 test.yakabod.net 1291646295'); 

EXECUTING AT 0.16751000 1291646304 -- WITH SID b97a379d2a73a9bb8df2ab0ee9665417 -- AGAINST test.yakabod.net 
RESPONSE RECEIVED FROM (https://test.yakabod.net/activityViewer/index.html) IN 1.5704379081726 
RUN system('php avtestTimed.php 5 test.yakabod.net 1291646295'); 

EXECUTING AT 0.51596300 1291646308 -- WITH SID 997b017d830cdd357036a24dd77313e9 -- AGAINST test.yakabod.net 
RESPONSE RECEIVED FROM (https://test.yakabod.net/activityViewer/index.html) IN 1.5980801582336 
RUN system('php avtestTimed.php 5 test.yakabod.net 1291646295'); 

EXECUTING AT 0.89809900 1291646312 -- WITH SID c512edc3491fb6ebc11ce72d547af201 -- AGAINST test.yakabod.net 
RESPONSE RECEIVED FROM (https://test.yakabod.net/activityViewer/index.html) IN 1.5987639427185 
RUN system('php avtestTimed.php 5 test.yakabod.net 1291646295'); 

Maintenant, ce que je dois faire est de prendre les deux variables: 1. À 0,51596300 1291646308 eXecuting 2. RÉPONSE DE REÇUS (https://test.yakabod.net/activityViewer/index.html) eN 1,5987639427185

et les stocker dans des variables teo: $ exec_at $ receive_at et mettre à jour avec RRDTool ces valeurs. ? Tous les conseils sur la façon dont je peux le faire, ce que je suis en train de parcelle est: 1. graphiques linéaires pour exécuter au variables 2. graphique Scatter pour la réponse

Merci, -Kamal.

Answer 1

Vous pouvez utiliser le RRD::Simple du CPAN pour tracer ceci très rapidement: créez simplement le rrd, et à chaque mise à jour de l'appel d'itération avec vos points de données. Vous devriez être capable d'adapter l'exemple sur le lien vers votre script.