print "Array in Array: ", @{$item}, "\n";
...
print "Hash in Array: ", %{$item}, "\n";