my %h = %default_values;
    my $self = ref($class) ? bless( \%h, ref($class) )
                           : bless( \%h, $class );