cr => 'l5', # candidate
pr => 'l5', # proposed
rec => 'l6', # recommendation
+ other => 'l6', # non-w3
ietf => 'l6', # standard
);
my %versions;
map {
$_ => +{
map {
- ($_->[4] => 0 ), # future
- ($_->[3] => .5), # next
- ($_->[0] => 5 ), # past
- ($_->[1] => 10 ), # previous
- ($_->[2] => 30 ), # current
+ my $zero = $#$_ - 2; # baseline index
+ ($_->[$zero - 2] => .5), # past
+ ($_->[$zero - 1] => 10 ), # previous
+ ($_->[$zero + 2] => 0 ), # future
+ ($_->[$zero + 1] => .5), # next
+ ($_->[$zero ] => 30 ), # current
} $caniuse->{agents}->{$_}->{versions}
}
} @browsers