sub rndPart2{ ## strictly ascending, skew possible
    my( $start, $end, $count ) = @_;
    my $step = ( $end - $start ) / $count;
    my $last = $start;
    $start += $step / 2;
    map{
        sprintf "%5.2f", $last = $last + ( rand( $_ + $step/2 - $last ) );
    } map{ $start + $step*$_ } 0 .. $count-1;
}