Which version of perl are you running an what platform are you running it on (the output of perl -V would be handy)? On my local machine I get the following error message when running the code

Can't declare constant item in "my" at - line 3, near ") ="
Execution of - aborted due to compilation errors.
[download]

This is on perl, v5.6.1 built for i686-linux-ld.
HTH

_________
broquaint