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
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