use v5.16;

package MyRole {
	use Moo::Role;
	sub BLAH () { 42 }
}

package MyClass {
	use Moo;
	BEGIN { with 'MyRole' };
	sub do_stuff { return BLAH }
}

say MyClass->new->do_stuff;