return  $va->[0] <=> $vb->[0]
    ||      $va->[1] cmp $vb->[1];

##</code><code>##

    return ($va->[0] <=> $vb->[0]
            or $va->[1] cmp $vb->[1]);