$ perl -MData::Dumper -e '%a=($bob => "foo"); print Dumper \%a'
$VAR1 = {
          '' => 'foo'
        };