perl -MData::Dumper -e '$href={a=>1,b=>{c=>1,d=>{e=>5}}}; %copy = %$href; print Dumper \%copy'

$VAR1 = {
          'a' => 1,
          'b' => {
                   'c' => 1,
                   'd' => {
                            'e' => 5
                          }
                 }
        };