Zdravim,
resim ted rrdtool, chtel bych mit statistiku pingu a trafficu. Ale kdyz chci vytvorit statistiku, tak mam problem se zadanim nastaveni update.
Nasel jsem na to nakej skript, ale ten mi nefunguje:(
Hlasi na radku 3 ( use RRDs; ) chybu:Kód:use lib qw( /rrdtool/perl-shared/blib/lib /rrdtool/perl-shared/blib/arch );
use lib qw( /usr/local/rrdtool-1.0.33/lib/perl /rrdtool/lib/perl );
use RRDs;
my $start=time;
my $rrd= "/var/www/ping.rrd";
my $name = "/var/www/ping.png";
if (not -f $rrd){
RRDs::create ($rrd, "--start",$start-1, "--step",300,
"DS:pingtime:GAUGE:600:U:U",
"RRA:AVERAGE:0.5:1:200",
);
my $ERROR = RRDs::error;
die "$0: unable to create `$rrd': $ERROR\n" if $ERROR;
};
my $t;
$t=`ping -c3 192.168.2.2 | grep round-trip|awk
'{\$c=split(\$4,i,"/");print i[1]}'`;
RRDs::update $rrd,"$start:$t";
RRDs::graph "$name",
"--title", "Demo ping prehladu",
"--start", "now-1d",
"--end", "now",
"--imgformat","PNG",
"--width=600",
"--height=300",
"DEF:a=$rrd:pingtime:AVERAGE",
"LINE2:pingtime#00b6e4:real",
"COMMENT:Aktuálna hodnota odozvy=$t",
;
if ($ERROR = RRDs::error) {
print "ERROR: $ERROR\n";
};
Can't locate RRDs.pm;
Poradi nekdo? :) dik