Looks random to me. Check this out:

$loop=5; { $total=100000; for (1..$total) { rand > .5 and $x++ and next; $y++; } $xp=$x/$total*100; $yp=$y/$total*100; $xd=50-$xp; $yd=50-$yp; print "X: $x ($xp%) $xd\nY: $y ($yp%) $yd\n"; $loop-- and redo; }

Results:

X: 49790 (49.79%) 0.210000000000001 Y: 50211 (50.211%) -0.210999999999991 X: 50071 (50.071%) -0.070999999999998 Y: 49930 (49.93%) 0.0700000000000003 X: 49781 (49.781%) 0.219000000000001 Y: 50220 (50.22%) -0.219999999999999 X: 50080 (50.08%) -0.0800000000000054 Y: 49921 (49.921%) 0.0790000000000006 X: 49898 (49.898%) 0.102000000000004 Y: 50103 (50.103%) -0.102999999999994 X: 50033 (50.033%) -0.0330000000000084 Y: 49968 (49.968%) 0.0319999999999965

In reply to RE: RE: Randomize List of items by turnstep
in thread Randomize List of items by johannz

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.