my $tmp = delete $test{ebene1};
%test2=( %test2, %$tmp );
# oder einzeilig
%test2=( %test2, %{ delete $test{ebene1} } );