|
Last change
on this file since 2347 was
1316,
checked in by quentin, 16 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.