X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/e1555594fb6091ea9bb05340c7e8576e930bb3c7..6b44545759289f85e96c8c6b41501484374afa61:/browser.plp diff --git a/browser.plp b/browser.plp index c2a5d25..13e6b5e 100644 --- a/browser.plp +++ b/browser.plp @@ -39,7 +39,6 @@ given ($get{usage} // 'wm') { :>.

-
<: my $caniuse = do 'browser-support.inc.pl' or die $! || $@; $_->{verrelease} = { @@ -131,7 +130,8 @@ for my $browser (@browsers) { ) for @{ $versions{$browser} }; } print '' x 1; -print "\n"; +say ''; +say '', $header, ''; sub featurescore { # relative amount of support for given feature @@ -242,6 +242,7 @@ sub sayusagecol { print '', int featurescore($caniuse->{data}->{$id}->{stats}) / $maxscore * 100; } +say ''; for my $id (sort { featurescore($caniuse->{data}->{$b}->{stats}) <=> featurescore($caniuse->{data}->{$a}->{stats}) @@ -254,8 +255,8 @@ for my $id (sort { sayusagecol($id); say ''; } -print '', $header; -print ''; +say ''; +say ''; sub formathtml { my $ref = defined wantarray ? [@_] : \@_; @@ -282,8 +283,7 @@ sub showversions { return join('‒', @span); } -:>
- +:>
@@ -323,6 +323,6 @@ sub showversions {
- - + +