use strict;
my %hash;
my $key = undef;
$hash{$key} = 3;
print "A hash element with value $hash{$key} is stored with key=$key\n";