projects / gitmo/Moose-Autobox.git / blame
| Commit | Line | Data |
|---|---|---|
| 5f654d8e | 1 | package Moose::Autobox::Defined; |
| 2 | use Moose::Role 'with'; | |
| 3 | ||
| caac33a3 | 4 | our $VERSION = '0.09'; |
| 5f654d8e | 5 | |
| 6 | with 'Moose::Autobox::Item'; | |
| 7 | ||
| 8 | sub defined { 1 } | |
| 9 | ||
| 31d40d73 | 10 | 1; |
| 11 | ||
| 12 | __END__ | |
| 13 | ||
| 14 | =pod | |
| 15 | ||
| 16 | =head1 NAME | |
| 17 | ||
| 18 | Moose::Autobox::Defined - the Defined role | |
| 19 | ||
| 20 | =head1 SYNOPOSIS | |
| 21 | ||
| 22 | use Moose::Autobox; | |
| 5272f13f | 23 | |
| 24 | my $x; | |
| 25 | $x->defined; # false | |
| 26 | ||
| 27 | $x = 10; | |
| 28 | $x->defined; # true | |
| 31d40d73 | 29 | |
| 30 | =head1 DESCRIPTION | |
| 31 | ||
| 8937074a | 32 | This is a role to describes a defined value. |
| 33 | ||
| 260cc81f | 34 | =head1 METHODS |
| 35 | ||
| 36 | =over 4 | |
| 37 | ||
| 260cc81f | 38 | =item B<defined> |
| 39 | ||
| 40 | =back | |
| 41 | ||
| 5272f13f | 42 | =over 4 |
| 43 | ||
| 44 | =item B<meta> | |
| 45 | ||
| 46 | =back | |
| 47 | ||
| 31d40d73 | 48 | =head1 BUGS |
| 49 | ||
| 50 | All complex software has bugs lurking in it, and this module is no | |
| 51 | exception. If you find a bug please either email me, or add the bug | |
| 52 | to cpan-RT. | |
| 53 | ||
| 54 | =head1 AUTHOR | |
| 55 | ||
| 56 | Stevan Little E<lt>stevan@iinteractive.comE<gt> | |
| 57 | ||
| 58 | =head1 COPYRIGHT AND LICENSE | |
| 59 | ||
| ea4e64bf | 60 | Copyright 2006-2008 by Infinity Interactive, Inc. |
| 31d40d73 | 61 | |
| 62 | L<http://www.iinteractive.com> | |
| 63 | ||
| 64 | This library is free software; you can redistribute it and/or modify | |
| 65 | it under the same terms as Perl itself. | |
| 66 | ||
| caac33a3 | 67 | =cut |