On a more general issue, I think that you need to read up some more on the use of variables, arrays and hashes in perl.

The answer to your question and some good tutorial on variables, ... can be found on this off-site link.