apply_roles_to_object
   Role::Tiny->apply_roles_to_object($foo, qw(Some::Role1 Some::Role2));