Hello there Discipulus, grazie for the alerts and for fixing the quotes issue serving me my own medicine.

The duplicates are because you ran it too fast! You need to run this code once a second or slower. The universe needs some time to settle ... i.e. the RNG seeds on time whose granularity is the second.

However, here is a version which seeds on something different:

echo '01234567890123456789' | perl -pe '$s=time+join "",{}=~/(\d+)/g;s
+/(.)/srand $s;rand for 0..$1;chr(ord("a")+rand 26)/ge'

[download]

More characters than expected I have not observed.

This test may be useful for others too:

echo '01234567890123456789' | perl -MTest::More -pe '
my $inp = $_; my $L = length($inp);
my $N = 100; # number of trials
$nt=0;
my %previous = ();
for(1..$N){
        my $tmp = $inp;
        my $s = join "$_", {} =~ /(\d+)/g; # because ...
        $tmp =~ s/(.)/srand $s;rand for 0..$1;chr(ord("a")+rand 26)/ge
+;
        $previous{$tmp} = 1;
        ok(length($tmp)==$L, "length of conversion (".length($tmp).") 
+equals expected ($L)."); $nt++;
}
ok(scalar(keys %previous)==$N, ($N-scalar(keys %previous))." duplicate
+s among $N trials"); $nt++;
done_testing($nt);
'

[download]

In reply to Re^3: A little golfing challenge: replace digits by random letters by bliako
in thread A little golfing challenge: replace digits by random letters by haukex

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.