--- Coro/myhttpd/shell.pl	2001/08/11 03:41:01	1.5
+++ Coro/myhttpd/shell.pl	2001/08/11 16:34:47	1.6
@@ -18,7 +18,7 @@
          for (values %conn::conn) {
             for (values %$_) {
                next unless $_;
-               push @data, "$_: $_->{remote_addr} $_->{uri}\n";
+               push @data, "$_->{country}/$_->{remote_addr} $_->{method} $_->{uri}\n";
             }
          }
          print $fh sort @data;