$ref= $obj->{param};
    for(  keys %$ref  ) {
        Mung( $ref->{$_} );
    }

##</code><code>##

    my @keys= keys $obj->{param}->%;