Select Code to Download

$ perl -MO=Deparse -e '%a=($bob => "foo")'
(%a) = ($bob, 'foo');
-e syntax OK

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