Я не уверен, что это одобрено, но вы всегда можете попробовать , применяя роль напрямую.
package R;
use Moose::Role;
sub f { say 42 }
package main;
use URI;
R->meta->apply( Moose::Meta::Class->initialize( 'URI' ) );
URI->new->f
Конечно, это требует некоторого подслащивания, абсолютно не гарантирует долгую работусрок, и, вероятно, совершенно не поддерживается.Тем не менее, именно так эффективно работает СС без присмотра.