mrtg/uptime.pl

Sun, 29 May 2011 16:29:06 +0200

author
Michael Schloh von Bennewitz <michael@schloh.com>
date
Sun, 29 May 2011 16:29:06 +0200
changeset 344
e33c1efbd60f
parent 160
1a36468e720c
permissions
-rw-r--r--

Update, correct, improve build configuration and packaging logic.
Update to new version of vendor software, bump copyright date, remove implicit
gcc dependency, add comments for Trolltech bug tracking, correct enforced
dynamic library linkage, and install mysterious process stub binary.

michael@176 1 #! @l_prefix@/bin/perl
michael@136 2 ##
michael@136 3 ## uptime.pl: provide formatted uptime(1) information
michael@136 4 ##
michael@136 5
michael@138 6 $null = 0;
michael@136 7 $uptime = `uptime`;
michael@138 8 $hostname = `hostname`;
michael@136 9
michael@136 10 $uptime =~ /up (.*?) day/;
michael@136 11 $up = int($1);
michael@136 12
michael@160 13 # According to http://oss.oetiker.ch/mrtg/doc/mrtg-reference.en.html
michael@160 14 # 'the external command must return 4 lines of output.'
michael@138 15 print "$up\n";
michael@138 16 print "$up\n";
michael@138 17 print "$null\n";
michael@160 18 print "$null\n";
michael@136 19

mercurial