in reply to Book Code

Change the curlies in 
my %hash = { .. };

[download]
to parens: 
my %hash = ( .. );

[download]

In Section Seekers of Perl Wisdom