$ perld 'my %h = (r => { x => { a => 1, b => 2 }}); dd \%h'
{ r => { x => { a => 1, b => 2 } } }