in reply to Hash/array madness

$our_hash->{somekey}->{foo} = $our_hash->{foo}

See perldoc perlreftut, perldoc perlref