PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : perl Data Dumper und Variablen



dilindam
28-02-2006, 13:59
Hallo allerseits,

ich poste mal als erstes das kl. perl:

#
use strict;
use Data:: Dumper;
use lib '/sowieso';
use l0::sql::database;

my $object = new l0::sql::database::tabelle();
my $fnret = $object->select({'characteristics' => {'IdType'=> 32}});

print Dumper $fnret;

So, dieses perl-skript holt mir aus einer Datenbank alle Daten raus die die
IdType 32 haben. Ist ne Menge, aber egal. Fast ganz unten des outputs, steht dann: 'selectedRows' => 2157

Ich muss diese Zahl in eine rrd Datenbank einpflegen. Die ändert sich natürlich öfters.
Also ich brauche diese Zahl als eine Variable.
Hintergrund ist rrd.
Ich will den rrd-update gleich mit in diesem Perlskript machen.

Dafür bin ich schon auf
http://search.cpan.org/~nicolaw/RRD-Simple-1.32/lib/RRD/Simple.pm#new
zugegen. Also mit dem Beispiel habe ich schon was gerafft.

Nur wie?

MfG Torsten

nic
03-03-2006, 12:02
Und dein Problem ist jetzt, dass du mit RRD net klarkommst, oder nur die Zahl brauchst?
Letzteres laesst sich bestimmt mit einer kleinen RegEx machen, sowas wie

$fnret =~ /selectedRows[^\d]+(\d+)/;
$rows = $+;
oder etwas Aehnliches.