use Data::Dumper;
...your code here ...
print Dumper($ref);