git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
browser: cleanup duplicate support determination
[sheet.git]
/
tools
/
convert-stats-wikimedia.pl
diff --git
a/tools/convert-stats-wikimedia.pl
b/tools/convert-stats-wikimedia.pl
old mode 100644
(file)
new mode 100755
(executable)
index
b5b833d
..
382fe0c
--- a/
tools/convert-stats-wikimedia.pl
+++ b/
tools/convert-stats-wikimedia.pl
@@
-1,11
+1,11
@@
-#!perl -n
+#!
/usr/bin/
perl -n
use 5.010; use strict; use warnings;
our %count;
our $mobile;
if (m{<td class=hl>} .. m{</?td>}) {
use 5.010; use strict; use warnings;
our %count;
our $mobile;
if (m{<td class=hl>} .. m{</?td>}) {
- $count{-
url
} = 'http://stats.wikimedia.org/archive/squid_reports/';
- $count{-
source
} = 'Wikimedia';
+ $count{-
source
} = 'http://stats.wikimedia.org/archive/squid_reports/';
+ $count{-
title
} = 'Wikimedia';
$count{-date} = $1 if m{ period: (?:\d+ )?(\w+ \d+) };
next;
}
$count{-date} = $1 if m{ period: (?:\d+ )?(\w+ \d+) };
next;
}