Commit | Line | Data |
---|---|---|
5f654d8e | 1 | package Moose::Autobox::Defined; |
2 | use Moose::Role 'with'; | |
3 | ||
e3598a18 | 4 | our $VERSION = '0.10'; |
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 |