いろいろと順番が前後している気もするけれど気にしない。 もう少しだけPerlの配列／ハッシュ絡みの覚書。 ハッシュの値だけを合計 my %score = ( "Homer" => 234, "Marge" => 135, "Bart" => 87, "Lisa" => 58, "Burns" => 5, "Krusty" => 135, ); my $tota…