Select Code to Download

#!/usr/bin/perl
use strict;
...
print "Hash: ",%Config::amazon_config,"\n";
print "Host: ",$Config::amazon_config{'host'},"\n";
print "Name: ",$Config::amazon_config{name},"\n";

package Config;
my %amazon_config = (
...
        'file_types' => [ qw( jpg mobi ) ],
        );
1;

Hash: 
...
Host: 
Use of uninitialized value in print at Objects.pl line 16.
Name: