mrtg/uptime.pl

Thu, 09 Apr 2009 01:03:24 +0200

author
Michael Schloh von Bennewitz <michael@schloh.com>
date
Thu, 09 Apr 2009 01:03:24 +0200
changeset 151
d176107091ef
parent 136
ca197d884ebd
child 160
1a36468e720c
permissions
-rw-r--r--

Update to new vendor version, integrate flag pictures, and correct URLs.

     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 print "$up\n";
    14 print "$up\n";
    15 print "$null\n";

mercurial