--- loncom/interface/lontest.pm	2001/01/03 18:54:04	1.1
+++ loncom/interface/lontest.pm	2001/01/06 17:15:22	1.2
@@ -21,13 +21,15 @@ use Apache::Constants qw(:common :http);
  
      $->print("<hr><h1>Debugging</h1><hr>\n");
      
+     my $i=0;
      foreach $envkey (sort keys %ENV) {
  	$r->print("$envkey ---- $ENV{$envkey}<br>");
+        $i++;
      }
+
+     $r->print('<h1>Total Number of Elements: '.$i.'</h1>');
  
 # ------------------------------------------------------------------- End Debug
-
-
      $r->print('</body></html>');        
  }