projects
/
gitmo/Moose-Autobox.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
210b22b85f3792e83902f58e74e40808d64c07a1
[gitmo/Moose-Autobox.git]
/
lib
/
Moose
/
Autobox
/
Defined.pm
1
package Moose::Autobox::Defined;
2
use Moose::Role 'with';
3
4
our $VERSION = '0.01';
5
6
with 'Moose::Autobox::Item';
7
8
sub defined { 1 }
9
10
sub do {
11
my ($self, $block) = @_;
12
local $_ = $self;
13
$block->($self);
14
}
15
16
1;