Parent Directory | Revision Log | Patch
revision 1.3 by dpavlin, Sat May 17 22:57:52 2003 UTC | revision 1.4 by dpavlin, Sat May 31 13:50:23 2003 UTC | |
---|---|---|
# | Line 2 | Line 2 |
2 | ||
3 | if ($#ARGV == 0) { | if ($#ARGV == 0) { |
4 | open(UPTIME,"ruptime |") || die "ruptime: $!"; | open(UPTIME,"ruptime |") || die "ruptime: $!"; |
5 | my $host = $ARGV[0]; | |
6 | while(<UPTIME>) { | while(<UPTIME>) { |
7 | chomp; | chomp; |
8 | if (/$ARGV[0].*(\d+) user.+load.+ ([\d\.]+), ([\d\.]+), ([\d\.]+)/) { | if (/$host.+(\d+) user.+load.+?([\d\.]+), ([\d\.]+), ([\d\.]+)$/) { |
9 | print "$2\n$3\n$4\n$1\n"; | print "$2\n$3\n$4\n$1\n"; |
10 | # } else { | # } else { |
11 | # print "skip: $_\n"; | # print "skip: $_\n"; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |