/[cricket]/getload
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /getload

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by dpavlin, Wed Apr 30 19:49:49 2003 UTC revision 1.3 by dpavlin, Sat May 17 22:57:52 2003 UTC
# Line 4  if ($#ARGV == 0) { Line 4  if ($#ARGV == 0) {
4          open(UPTIME,"ruptime |") || die "ruptime: $!";          open(UPTIME,"ruptime |") || die "ruptime: $!";
5          while(<UPTIME>) {          while(<UPTIME>) {
6                  chomp;                  chomp;
7                  if (/$ARGV[0].*(\d+) user.+load.+([\d\.]+), ([\d\.]+), ([\d\.]+)/) {                  if (/$ARGV[0].*(\d+) user.+load.+ ([\d\.]+), ([\d\.]+), ([\d\.]+)/) {
8                          print "$2\n$3\n$4\n$1\n";                          print "$2\n$3\n$4\n$1\n";
9  #               } else {  #               } else {
10  #                       print "skip: $_\n";  #                       print "skip: $_\n";
# Line 12  if ($#ARGV == 0) { Line 12  if ($#ARGV == 0) {
12          }          }
13  } else {  } else {
14          shift @ARGV;    # ship hostname (used for ruptime)          shift @ARGV;    # ship hostname (used for ruptime)
15          my $cmd = join(" ",@ARGV);          my $cmd = join(" ",@ARGV) || "uptime";
16          open(UPTIME,"$cmd |") || die "$cmd: $!";          open(UPTIME,"$cmd |") || die "$cmd: $!";
17          while(<UPTIME>) {          while(<UPTIME>) {
18                  chomp;                  chomp;
19                  if (/(\d+) user.+load.+([\d\.]+), ([\d\.]+), ([\d\.]+)/) {                  if (/(\d+) user.+load.+ ([\d\.]+), ([\d\.]+), ([\d\.]+)/) {
20                          print "$2\n$3\n$4\n$1\n";                          print "$2\n$3\n$4\n$1\n";
21  #               } else {  #               } else {
22  #                       print "skip: $_\n";  #                       print "skip: $_\n";

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

  ViewVC Help
Powered by ViewVC 1.1.26