X-Git-Url: https://git.octo.it/?p=rrdtool.git;a=blobdiff_plain;f=examples%2Fstripes.pl.in;h=362f4992e02743559107dda00b912721c6e982bc;hp=5c4c6dfaa663fa758a26d1653a55449c52133820;hb=15a6a9daa43842107b430edeb535d0e8e3baadb0;hpb=a4e465de6b8cb972864ec1636bef470dd1173d89

diff --git a/examples/stripes.pl.in b/examples/stripes.pl.in
index 5c4c6df..362f499 100755
--- a/examples/stripes.pl.in
+++ b/examples/stripes.pl.in
@@ -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";
 };