projects
/
rrdtool.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
added missing bits from internationalization
[rrdtool.git]
/
examples
/
minmax.pl.in
diff --git
a/examples/minmax.pl.in
b/examples/minmax.pl.in
index
87973d2
..
3fd0e65
100755
(executable)
--- a/
examples/minmax.pl.in
+++ b/
examples/minmax.pl.in
@@
-1,14
+1,12
@@
#! @PERL@
#! @PERL@
-#makes things work when run without install
-use lib qw( ../libraries/perl-shared/blib/lib ../libraries/perl-shared/blib/arch );
-# this is for after install
-use lib qw( @prefix@/lib/perl ../lib/perl );
+use lib qw( @prefix@/lib/perl );
use RRDs;
my $start=time;
my $rrd="randome.rrd";
my $name = $0;
use RRDs;
my $start=time;
my $rrd="randome.rrd";
my $name = $0;
+$name =~ s/.*\///g;
$name =~ s/\.pl.*//g;
RRDs::create ($rrd, "--start",$start-1, "--step",300,
$name =~ s/\.pl.*//g;
RRDs::create ($rrd, "--start",$start-1, "--step",300,
@@
-46,9
+44,9
@@
RRDs::graph "$name.png",
;
if ($ERROR = RRDs::error) {
;
if ($ERROR = RRDs::error) {
-
print
"ERROR: $ERROR\n";
+
die
"ERROR: $ERROR\n";
};
print "This script has created $name.png in the current directory\n";
};
print "This script has created $name.png in the current directory\n";
-print "This demonstrates the use of
the TIME and % RPN operator
s\n";
+print "This demonstrates the use of
MIN and MAX archive
s\n";