- or $data->{$browser}->{$prev} ~~ $data->{$browser}->{$ver}) {
- printf '<td class="%s" colspan="%d">%s',
- $CSTATS{ $data->{$browser}->{$prev} },
+ or ref $data->{$browser} eq 'HASH'
+ && $data->{$browser}->{$prev} ~~ $data->{$browser}->{$ver}) {
+ my $usage = sum(map { $canihas->{$browser}->{$_} } @span);
+ printf '<td class="%s" colspan="%d" title="%.1f%%">%s',
+ join(' ',
+ X => $CSTATS{
+ ref $data->{$browser} ne 'HASH' ? 'u' :
+ $data->{$browser}->{$prev} // 'u'
+ },
+ !$usage ? ('p0') : ('p',
+ sprintf('p%01d', $usage / 10),
+ sprintf('p%02d', $usage),
+ ),
+ sprintf('pp%02d', $usage / $scorediv),
+ ),