}
$canihas = eval { Data("data/browser/usage-$_") } or do {
- Alert('Browser usage data not found', $@);
+ Alert('Browser usage data not found', ref $@ ? @{$@} : $@);
next;
};
$usage = $_;
// $prev # inherit from predecessor
|| 'u' # unsure
);
- if (defined $prev and not $prev ~~ $compare) {
+ if (defined $prev and not (defined $compare and $prev eq $compare)) {
# different columns
my @vercover = (map { @{$_} } @span); # accumulated conforming versions
for ($ver ? @{$ver} : ()) {