updated versions to account for rrd cached fix
[rrdtool.git] / examples / stripes.pl.in
index 5c4c6df..362f499 100755 (executable)
@@ -1,10 +1,5 @@
 #! @PERL@
-
-#makes things work when run without install
-use lib qw( ../bindings/perl-shared/blib/lib ../bindings/perl-shared/blib/arch );
-
-#makes programm work AFTER install
-use lib qw( @prefix@/lib/perl ../lib/perl );
+use lib qw( @prefix@/lib/perl );
 
 use strict;
 use vars qw(@ISA $loaded);
@@ -43,7 +38,7 @@ RRDs::graph "stripes.png",
   "COMMENT:alpha=TIME,1200,%,600,LT,a,UNKN,IF",
   "COMMENT:beta=TIME,1200,%,600,GE,b,UNKN,IF\\j";
 if ($ERROR = RRDs::error) {
-  print "ERROR: $ERROR\n";
+  die "ERROR: $ERROR\n";
 };