Select Code to Download

my $self = bless deep_copy( \%default_values ), $class;

#!/usr/local/bin/perl
use strict;
...
    }
    print Dumper (\%dv);
}

compare( default_values(), 
  {
...
    return { %default_values };
}
}

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