use constant MONIKER => 'name';

my %hash1 = ( +MONIKER => 'Monica' );  # compared with...
my %hash2 = (  MONIKER => 'Monica' );

use Data::Dumper;
print Dumper(\%hash1, \%hash2);