Re: Way to use Moo::Role to extend non-Moo class?

in reply to Way to use Moo::Role to extend non-Moo class?

Roles don't "extend" classes. Subclasses extend classes.

This will work:

package Foo {
  sub new {
    bless {}, shift;
  }
  sub foo {
    print "foo\n";
  }
}

package Bar {
  use Moo;  # NOT Moo::Role
  extends "Foo";
}
[download]

... but if the constructor for class Foo is any more complicated than the above, you'll need to write a FOREIGNBUILDARGS method for Bar to tell Bar's constructor what argument need to be passed along to Foo's constructor.

use Moops; class Cow :rw { has name => (default => 'Ermintrude') }; say Cow->new->name

In Section Seekers of Perl Wisdom