Help for this page

Select Code to Download

Select or download this

my %data=map {
    +"Player number $_", [ map { 1 + int rand(10) } 1 .. 5 ] 
} 1 .. 10;

Select or download this

my %data=map {
  $_  => [ map { 1 + int rand(10) } 1 .. 5 ]
} 1 .. 10;