X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/2ae4ccbb6ac3ce310890beef55fda11f670772bb..a9c93a19c0b7f17d653a61522ecffa4319d0590a:/browser.plp diff --git a/browser.plp b/browser.plp index 3f7b6f8..4a18cb4 100644 --- a/browser.plp +++ b/browser.plp @@ -50,9 +50,22 @@ if (my ($somerow) = values %{ $caniuse->{data} }) { } } -my $canihas = do 'browser-usage.inc.pl' or do { +my $canihas = do 'browser-usage.inc.pl' || do { printf "

Browser usage data not found: %s.

\n", $_ for $! || $@; + +{ + map { + $_ => +{ + map { + ($_->[4] => 0 ), # future + ($_->[3] => .5), # next + ($_->[0] => 5 ), # past + ($_->[1] => 10 ), # previous + ($_->[2] => 30 ), # current + } $caniuse->{agents}->{$_}->{versions} + } + } @browsers + }; # fallback hash based on release semantics }; my $scorediv = (max(map { sum(values %$_) } values %$canihas) // 1) / 100;