while( 9 < ++$pick[$i]  ) {

##</code><code>##

    return reverse @pick;