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


Odpověď s citací

