my $a = hash {} ;