Replace MULTIPLE first keys of multi-dimensional Hash in perl

$Hash1{300} = {%{$Hash1{3}},%{$Hash1{4}}};
delete $Hash1{3};
delete $Hash1{4};