use Perl6::Variables;
use Perl6::Say;

my %ages = (
  Huey  => 4,
  Dewey => 5,
  Louie => 6 );

for(keys %ages) {
    say "$_ is %ages{$_} years old.";
}