1package Data::Validator::Role::Method; 2use Mouse::Role; 3 4around validate => sub { 5 my($next, $self, @args) = @_; 6 return( shift(@args), $self->$next(@args) ); 7}; 8 9no Mouse::Role; 101; 11__END__ 12 13=for stopwords invocant 14 15=head1 NAME 16 17Data::Validator::Role::Method - Deals with the invocant of methods 18 19=cut 20 21