mrtg/uptime.pl@061d2617f42f
mrtg/uptime.pl
Thu, 02 Aug 2012 22:11:13 +0200
- author
- Michael Schloh von Bennewitz <michael@schloh.com>
- date
- Thu, 02 Aug 2012 22:11:13 +0200
- changeset 450
- 061d2617f42f
- parent 160
- 1a36468e720c
- permissions
- -rw-r--r--
Provide 80Ko of shell script instead of standard 64Ko allocation.
This is needed to accommodate recent script addtions involving smf(5).
1 #! @l_prefix@/bin/perl
2 ##
3 ## uptime.pl: provide formatted uptime(1) information
4 ##
6 $null = 0;
7 $uptime = `uptime`;
8 $hostname = `hostname`;
10 $uptime =~ /up (.*?) day/;
11 $up = int($1);
13 # According to http://oss.oetiker.ch/mrtg/doc/mrtg-reference.en.html
14 # 'the external command must return 4 lines of output.'
15 print "$up\n";
16 print "$up\n";
17 print "$null\n";
18 print "$null\n";
