projects
/
gitmo/MooseX-Emulate-Class-Accessor-Fast.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
0022be47cd4283291f2c4fbbbb9ecce5c24388d9
[gitmo/MooseX-Emulate-Class-Accessor-Fast.git]
/
t
/
lib
/
TestAdoptCAF.pm
1
package TestAdoptCAF;
2
3
use base qw/Class::Accessor::Fast/;
4
5
__PACKAGE__->mk_accessors('foo');
6
__PACKAGE__->mk_ro_accessors('bar');
7
__PACKAGE__->mk_wo_accessors('baz');
8
9
1;