Magic-Mirror/gecko-dev
1
0
Fork 0
mirror of https://github.com/mozilla/gecko-dev.git synced 2024-10-13 13:25:37 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Don't assume we're in the root dir and intensify some comments about what we should be doing.

Browse Source
This commit is contained in:
myk%mozilla.org 2004-05-22 16:43:20 +00:00
parent 17162ac311
commit 3afe02e6e0
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
tools/download-stats/process-logs.pl
View File

@ -11,14 +11,17 @@ use Socket; # DNS queries
use File::Find; # grabbing the list of log files from the filesystem
#use Fcntl ':flock'; # import LOCK_* constants for locking log files
# XXX Probably should use File::Basename for splitting paths up into paths and filenames.
# XXX Should use File::Basename for splitting paths up into paths and filenames.
# Stuff that should really go into a config file.
# XXX This stuff should go into a config file.
my $root_dir = "/data/ftp-logs";
my $sites = "aol|gatech|indiana|isc|oregonstate|rediris|scarlet|utah"; # XXX Maybe this should be generated by a database query.
my $sites = "aol|gatech|indiana|isc|oregonstate|rediris|scarlet|utah"; # XXX Should be generated by a database query.
my $verbose = 1;
my $DO_REVERSE_DNS_LOOKUPS = 0;
chdir $root_dir
or die "Can't change to root dir $root_dir: $!";
# Figure out what period of time to process the logs from. We use
# a file's "modification time" attribute to store the most recent time
# at which logs were processed, and we process logs between that time