browser: only annotate end date of wikimedia data
authorMischa POSLAWSKY <perl@shiar.org>
Sat, 29 Apr 2017 19:03:52 +0000 (21:03 +0200)
committerMischa POSLAWSKY <perl@shiar.org>
Mon, 29 May 2017 17:21:28 +0000 (19:21 +0200)
tools/mkusage-wikimedia

index 6ce3652498ce6111ae1c659ac0ffa5a1777db1d7..a50d89942069ce8124dd74ab17fd839b1c090f3f 100755 (executable)
@@ -44,11 +44,9 @@ while (my $row = readline) {
        $version =~ s/\A-\z/0/;
        $count{$browser}{$version} += $pct;
        $count{-total} += $pct;
-       $count{-date}->{$date}++;
+       $count{-date} = $date;
 }
 
-$_ = join ' to ', (sort keys %{$_})[0, -1] for $count{-date};
-
 my $mult = 100 / delete $count{-total};
 for (values %count) {
        ref $_ eq 'HASH' or next;