File Coverage

blib/lib/POE/Declare/Meta/Param.pm
Criterion Covered Total %
statement 17 17 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 23 23 100.0


line stmt bran cond sub pod time code
1             package POE::Declare::Meta::Param;
2              
3             =pod
4              
5             =head1 NAME
6              
7             POE::Declare::Meta::Param - A named attribute passed to the constructor
8             as a parameter.
9              
10             =head1 DESCRIPTION
11              
12             B is a sub-class of
13             L. It defines an attribute for which the
14             initial value will be passed by name to the constructor.
15              
16             The declaration does not concern itself with issues of type or
17             whether the param is required. These types of issues are left as a concern
18             for the implementation.
19              
20             After the object has been created, the parameter will be read-only.
21              
22             Any values that should be controllable after object creation should be
23             changed via a custom method or event that understands the statefulness of
24             the object, and will make the actual change to the attribute at the correct
25             time, and in the correct manner.
26              
27             By default, every class is assigned a default C parameter.
28              
29             This parameter represents the name of the object, which should be unique at
30             a process level for the duration of the entire process and persist across
31             multiple starting and stopping of the object (if it supports stopping and
32             restarting).
33              
34             By default, each object is assigned a name based on the class and an
35             incrementing number. A typical Alias might be "Class::Name.123".
36              
37             If you wish to override this with your own name for an object, you are free
38             to do so.
39              
40             =cut
41              
42 4     4   87 use 5.008007;
  4         12  
  4         134  
43 4     4   18 use strict;
  4         6  
  4         107  
44 4     4   17 use warnings;
  4         6  
  4         88  
45 4     4   2246 use POE::Declare::Meta::Attribute ();
  4         8  
  4         85  
46              
47 4     4   21 use vars qw{$VERSION @ISA};
  4         6  
  4         219  
48             BEGIN {
49 4     4   9 $VERSION = '0.59';
50 4         156 @ISA = 'POE::Declare::Meta::Attribute';
51             }
52              
53             1;
54              
55             =pod
56              
57             =head1 SUPPORT
58              
59             Bugs should be always be reported via the CPAN bug tracker at
60              
61             L
62              
63             For other issues, or commercial enhancement or support, contact the author.
64              
65             =head1 AUTHORS
66              
67             Adam Kennedy Eadamk@cpan.orgE
68              
69             =head1 SEE ALSO
70              
71             L, L
72              
73             =head1 COPYRIGHT
74              
75             Copyright 2006 - 2012 Adam Kennedy.
76              
77             This program is free software; you can redistribute
78             it and/or modify it under the same terms as Perl itself.
79              
80             The full text of the license can be found in the
81             LICENSE file included with this module.
82              
83             =cut