moose-forces-me-to-know-role-implementation-details.pl

package R;
use Moose::Role;
has "foo" => (
  is => "ro",
  required => 1,
  default => 5
);

package X;
use Moose;
with "R";
has "+foo" => (
  builder => "_build_foo"
);
sub _build_foo { 6 }

#### Setting both default and builder is not allowed. at /usr/lib/perl5/Class/MOP/Attribute.pm line 46.

package R;
use Moose::Role;
has "foo" => (
  is => "ro",
  required => 1,
  builder => "_build_foo",
);
sub _build_foo { 5 }

package X;
use Moose;
with "R";
has "+foo" => (
  default => 6
);

#### Setting both default and builder is not allowed. at /usr/lib/perl5/Class/MOP/Attribute.pm line 46.