sub mysub{
    my $h = shift;
    my %dereferenced_hash = %$h;
    delete $dereferenced_hash{'b'};
}