ハッシュのキーを削除する

#!/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: 最初の状態
say "1: 最初の状態";
say "key Aiko exists." if $math_score_of->exists(&#39;Aiko&#39;);

# deleteでキーを削除
$math_score_of->delete(&#39;Aiko&#39;);
say "key Aiko doesn&#39;t exist." unless $math_score_of->exists(&#39;Aiko&#39;);

say Dumper $math_score_of;

__END__