Last change
on this file since 1863 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
|
Line | |
---|
1 | #!/bin/sh |
---|
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.