Select Code to Download

my %newhash = (
    accesslevels => {
...
        default => $oldhash{function}{default}{content}
    }
);

my %newhash;
foreach my $key1 (keys %oldhash) {
...
        }
    }
}