in reply to $x{1}{2} versus $x{1}->{2}
perl -e '%x = (1=>{3=>4}); %r = %{$x{1}}; print $r{3}' [download]