Help for this page
c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le "use List::MoreUtils qw(zip); ... dd \%score; " { barney => 195, dino => 30, fred => 205 }