MouseX::NativeTraits::CodeRef
Helper trait for CodeRef attributes
Helper trait for CodeRef attributes
package Foo;
use Mouse;
has 'callback' => (
traits => ['Code'],
is => 'ro',
isa => 'CodeRef',
default => sub { sub { print "called" } },
handles => {
call => 'execute',
},
);
my $foo = Foo->new;
$foo->call; # prints "called"
This provides operations on coderef attributes.
MouseX::NativeTraits