$i++ until $i >= @$a or $i >= @$b
    or $o = ( $a->[$i] cmp $b->[$i] );