Moose :: Role - простой способ расширить приложение роли?

У меня есть Moose :: Role , которую я хотел бы вызвать в классе, когда эта роль применяется к классу.

Есть ли простой способ изменить то, что происходит при применении роли, без необходимости слишком много копаться в кодировании типов Moose :: Meta :: Role ? В идеале я бы просто хотел после 'apply' => ... чтобы добавить лишние вещи.

Изменить:

Я специально использую это с DBIx :: Class :: Определение результата Core для создания чего-то вроде компонента, который также изменяет конструктор. Я бы просто написал его как компонент, если бы мог получить результат в подпрограммах BUILDARGS и BUILD , но я не могу этого сделать. Итак, вместо выполнения load_component , я выполняю с 'ролью' , но некоторые эффекты компонента заключаются в добавлении отношения own_to к классу. Следовательно, я подумал, что лучший способ сделать это - во время применения роли к классу.