#!/usr/bin/env perl use strict; use warnings; use Moose::Autobox; use Perl6::Say; my $mother_of = { Taro => 'Tomoko', Naoko => 'Shizuka', Kenji => 'Sayo', }; ### 1: ハッシュのすべてのキーを取り出す say $mother_of->k…

#!/usr/bin/env perl use strict; use warnings; use Data::Dumper; use Perl6::Say; use Moose::Autobox; ### ハッシュのキーを削除するには、delete関数を使う。 my $math_score_of = { Aiko => 89, Kenta => 0, Taro => undef, }; #生徒の数学の点数 #1: …