Last change
on this file since 1928 was
1316,
checked in by quentin, 15 years ago
|
Handle ~urls as well when gathering statistics
|
-
Property svn:executable set to
*
|
File size:
316 bytes
|
Rev | Line | |
---|
[1314] | 1 | #!/bin/sh |
---|
[1316] | 2 | perl -ne 'BEGIN { $| = 1 } |
---|
| 3 | next unless /^18\./; |
---|
| 4 | next if /^18\.181\./; |
---|
| 5 | chomp; split; |
---|
| 6 | if ($_[1] eq "scripts.mit.edu" && $_[2] =~ m|/(~[^/]+)/|) { |
---|
| 7 | print "$1\n"; |
---|
| 8 | } else { |
---|
| 9 | print "$_[1]\n"; |
---|
| 10 | }' >> /var/log/httpd/statistics_log |
---|
| 11 | #awk '/^18\./ && ! /^18.181/ { print $2; fflush() }' >> /var/log/httpd/statistics_log |
---|
Note: See
TracBrowser
for help on using the repository browser.