--- loncom/cgi/userstatus.pl	2003/07/29 20:17:52	1.3
+++ loncom/cgi/userstatus.pl	2003/07/29 20:23:17	1.4
@@ -87,14 +87,19 @@ while ($filename=readdir(DIR)) {
     }
 }
 closedir(DIR);
+open (LOADAVGH,"/proc/loadavg");
+$loadavg=<LOADAVGH>;
+close(LOADAVGH);
 unless ($oneline) { 
 print "<hr /><h2>User Count</h2>";
 foreach (sort keys %usercount) {
     print "<b>".$_.":</b> ".$usercount{$_}."<br />";
 }
+print "<b>Load Average:<b> ".$loadavg;
 print "</body></html>";
 } else {
 foreach (sort keys %usercount) {
     print $_.'='.$usercount{$_}.'&';
 }
+print 'loadavg='.$loadavg;
 }