How to replace a Perl hash key?

Question

Let us say if I have a hash like this:

$data = {
    \'key1\' => {
                \'key2\' => \'value1\'
              },
    \'key3\' => {
                


        

Answer 1

The delete operator returns the value being deleted. So this

$data->{key3}{key4}{key6} = delete $data->{key3}{key4}{key5}

will do what you're looking for.