In this case,not able to print the contents.

What happens?

It would be easier if you minimized your code to a few lines which demonstrate your problem, and without the other code that is of no interest to us.

You should also read perlreftut, which introduces you to references in Perl.