Hello, and thanks for your interest in Class::MakeMethods.

Subclassing Class::MakeMethods to add new types of methods is described in the "Extending" section of the documentation.

package MyMakeMethods;

use Class::MakeMethods '-isasubclass';

sub new {
  map { 
    my $name = $_->{name};
    my @required = split ' ', $_->{required};
    $name => sub {
      my ( $class, %params ) = @_;
      die unless exists $params{$_} foreach ( @required );
      bless \%params, $class;
    }
  } (shift)->_get_declarations( @_ );
}

sub get_set { 'Standard::Hash:scalar' }

1;
[download]

However, you don't need to subclass again to use those new method types; just use Class::MakeMethods's regular calling interface:

package MyFoo;

use MyMakeMethods (
  new     => { name => 'new', required => 'x y' },
  get_set => 'x y z',
);

1;
[download]

That's untested, but it should get you started. Usage might look like the following:

package main;

use MyFoo;

my $foo = MyFoo->new( x => 'Xerces', y => 'Yes' );
[download]