Help for this page

Select Code to Download


  1. or download this
    my %h = map { $_, rand } 'a'..'z';
    
    print "$_ => $h{$_}\n" for sort keys %h;