I believe you are having a problem with chomp(). That being said, read up on chomp and modify your codez.

my %hash = map { chomp(my ($a, $b) = split(/ = /, $_)); $a => $b } @ar
+ray;
[download]

(Hint, lookup what chomp returns.)

Update: shmen beat me to it :(. I like the way he chomped, too -- better looking than those parens (in this scenario, anyway).

Update: Reworded my previous update.