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