Hash Perl

$hash{name} = "AAA";
print $hash{name};