my $class = Moose::Util::with_traits( $a_class, @bunch_of_roles );
my $instance = $class->new;

##</code><code>##

My::Role->meta->apply( $some_instance );

##</code><code>##

Moose::Meta::Role->combine( @role_meta_objects )->apply( $some_instance );