Select Code to Download

#!/usr/bin/perl -w

...

  print Dumper($hashref);
}

[alex@home dev]$ perl -w hashref.pl 
$VAR1 = {
          'foo' => 'bar'
        };

#!/usr/bin/perl -w

...

  print Dumper($hashref);
}

[alex@home dev]$ perl -w hashref2.pl
Can't use an undefined value as a HASH reference at hashref2.pl line 6
+.