diff options
author | Tobi Oetiker <tobi@oetiker.ch> | 2005-02-11 21:22:38 +0100 |
---|---|---|
committer | Tobi Oetiker <tobi@oetiker.ch> | 2005-02-11 21:22:38 +0100 |
commit | 3623e33d0ae10eaeca653e00a3796495dbc0f713 (patch) | |
tree | a0835e8015f995402c2b8046255d7d101e7f9a59 /htdocs/smokeping.cgi.dist | |
download | smokeping-3623e33d0ae10eaeca653e00a3796495dbc0f713.tar.gz smokeping-3623e33d0ae10eaeca653e00a3796495dbc0f713.tar.xz |
initial import
Diffstat (limited to 'htdocs/smokeping.cgi.dist')
-rwxr-xr-x | htdocs/smokeping.cgi.dist | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/htdocs/smokeping.cgi.dist b/htdocs/smokeping.cgi.dist new file mode 100755 index 0000000..e44340b --- /dev/null +++ b/htdocs/smokeping.cgi.dist @@ -0,0 +1,17 @@ +#!/usr/sepp/bin/speedy -w +# -*-perl-*- + +use lib qw(/usr/pack/rrdtool-1.0.33-to/lib/perl); +use lib qw(/home/oetiker/data/projects/AADJ-smokeping/dist/lib); + +use Smokeping 1.38; + +Smokeping::cgi("/home/oetiker/data/projects/AADJ-smokeping/dist/etc/config"); + + +BEGIN { + if ($ENV{SERVER_SOFTWARE}) { + $SIG{__WARN__} = sub { print "Content-Type: text/plain\n\n".(shift)."\n"; }; + $SIG{__DIE__} = sub { print "Content-Type: text/plain\n\n".(shift)."\n"; exit 1 } + }; +} |