Select Code to Download

  DB<41> %h=();$e=3; $N=10; $h{ int $N * rand() **$e }++ for 1..10000

...
   8 => 426
   9 => 336
  DB<43>