"caroline"
30
"andrew"
10
##</code><code>##

open DATAFILE, "<somedata"
    or die "Cannot open datafile: $!";
%some_new_hash = <DATAFILE>;
print keys %some_new_hash; # This works fine
print $some_new_hash{"andrew"}; # Causes Error

##</code><code>##

use Data::Dumper;
my %some_hash = (
	andrew => 10,
	caroline => 30
);
$Data::Dumper::Terse = 1;
$Data::Dumper::Indent = 1;
$Data::Dumper::Useqq = 1;

open DATAFILE, ">somedata"
    or die "Cannot open datafile: $!";

print DATAFILE Dumper %some_hash;