or download this
Reference found where even-sized list expected at pm602312.pl line 2
(W misc) You gave a single reference where Perl was expecting a list
...
%hash = [ qw/ an anon array / ]; # WRONG
%hash = ( one => 1, two => 2, ); # right
%hash = qw( one 1 two 2 ); # also fine