note
BrowserUk
<blockquote><i>
I can then extend that to return a random number of elements: <c>@array[0 .. int rand @array];</c>. But I need to also sometimes get 0 elements.
</i></blockquote>
<p>That will return 0 elements approx. 10% of the time:<code>
@array = 0 .. 9;;
sub x{ return @array[ 0 .. int( rand @array ) ]; };;
$stats{ scalar( x() ) }++ for 1 .. 1000;;
pp \%stats;;
{ "0" => 90, 1 => 103, 2 => 126, 3 => 99, 4 => 101, 5 => 101, 6 => 88, 7 => 97, 8 => 105, 9 => 90 }
</code>
<div class="pmsig"><div class="pmsig-171588">
<hr />
<font size=1 >
<div>With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'</div>
<div>Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.</div>
<div>"Science is about questioning the status quo. Questioning authority". </div>
<div>In the absence of evidence, opinion is indistinguishable from prejudice.
<p align=right> [http://thebottomline.cpaaustralia.com.au/|RIP Neil Armstrong]</p></div>
</font>
</div></div>Computers are making people easier to use everydaydiv
1007684
1007684