package class; use Data::Dumper; BEGIN { $Data::Dumper::Sortkeys = 1; print 'Before "use Class::MethodMaker": '; print Dumper(\%{*class::}); } use Class::MethodMaker get_set => [ qw/ field_1 field_2 field_3 field_4 field_5/] , new_with_init => 'new', new_hash_init => 'hash_init' ; BEGIN { print 'After "use Class::MethodMaker": '; print Dumper(\%{*class::}); } # ...