Method::Modifiers - Lightweight method modifiers
package Foo; use warnings; use Data::Util qw(:all); use Method::Modifiers; before old_method => curry \&warnings::warnif, deprecated => q{"old_method" is deprecated, use "new_method" instead}; my $success = 0; after qw(foo bar baz) => sub{ $success++ }; around foo => sub{ my $next = shift; my $self = shift; $self->$next(map{ instance $_, 'Foo' } @_); };
This module is an implementation of Class::Method::Modifiers that provides Moose-like method modifiers.
Class::Method::Modifiers
Moose
This is just a front-end of Data::Util::modify_subroutine() and Data::Util::subroutine_modifier()
Data::Util::modify_subroutine()
Data::Util::subroutine_modifier()
See Data::Util for details.
Data::Util.
Moose.
Class::Method::Modifiers.
To install Data::Util, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Data::Util
CPAN shell
perl -MCPAN -e shell install Data::Util
For more information on module installation, please visit the detailed CPAN module installation guide.