Select Code to Download

my $hash;
$hash{foo} = bar;

my %hash;
$hash{foo} = 'bar';
...

my $hash = {};
$hash->{foo} = 'bar';

#!/usr/bin/perl
use strict;
...
my $hash = {};
$hash->{foo} = 'bar';
print Dumper(\$hash);