the images should be written to the current directory ... -- Alex

git-svn-id: svn://svn.oetiker.ch/rrdtool/branches/1.2/program@699 a5681a0c-68f1-0310-ab6d-d61299d08faa

diff --git a/examples/4charts.pl.in b/examples/4charts.pl.in
index beeb6f4..828595c 100755 (executable)
--- a/examples/4charts.pl.in
+++ b/examples/4charts.pl.in
@@ -8,6 +8,7 @@ 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,

diff --git a/examples/bigtops.pl.in b/examples/bigtops.pl.in
index b3fa6e4..0f5d98c 100755 (executable)
--- a/examples/bigtops.pl.in
+++ b/examples/bigtops.pl.in
@@ -6,6 +6,7 @@ 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,

diff --git a/examples/minmax.pl.in b/examples/minmax.pl.in
index 29c0169..1e94a6f 100755 (executable)
--- a/examples/minmax.pl.in
+++ b/examples/minmax.pl.in
@@ -6,6 +6,7 @@ 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,
@@ -48,4 +49,4 @@ if ($ERROR = RRDs::error) {
 
 
 print "This script has created $name.png in the current directory\n";
-print "This demonstrates the use of the TIME and % RPN operators\n";
+print "This demonstrates the use of MIN and MAX archives\n";