shell bypass 403
package MooseX::Role::WithOverloading::Meta::Role::Application::Composite;
our $VERSION = '0.17';
use Moose::Role;
use namespace::autoclean;
with 'MooseX::Role::WithOverloading::Meta::Role::Application';
around apply_overloading => sub {
my ($next, $self, $composite, $other) = @_;
for my $role (@{ $composite->get_roles }) {
$self->$next($role, $other);
}
};
1;