<(common.inc.plp)><:
-use 5.010;
-use utf8;
use List::Util qw(sum max first);
no if $] >= 5.018, warnings => 'experimental::smartmatch';
Html({
title => 'browser compatibility cheat sheet',
- version => '1.3',
+ version => '1.4',
description => [
"Compatibility table of new web features (HTML5, CSS3, SVG, Javascript)",
"comparing support and usage share for all popular browser versions.",
say '</p>';
}
printf 'Resources: %s.', join(', ', map {
- sprintf '<a href="%s">%s</a>', EscapeHTML($_->{url}), $_->{title}
+ sprintf '<a href="%s">%s</a>', EscapeHTML($_->{url}), EscapeHTML($_->{title})
} @$_) for grep { @$_ } $row->{links} // ();
printf '<br>Parent feature: %s.', join(', ', map {
sprintf '<a href="%s">%s</a>', EscapeHTML("#$_"), $caniuse->{data}->{$_}->{title}