2 package Class::MOP::Module;
7 use Scalar::Util 'blessed';
10 our $AUTHORITY = 'cpan:STEVAN';
12 use base 'Class::MOP::Package';
16 ${$self->get_package_symbol({ sigil => '$', type => 'SCALAR', name => 'VERSION' })};
21 ${$self->get_package_symbol({ sigil => '$', type => 'SCALAR', name => 'AUTHORITY' })};
28 ($self->version || ()),
29 ($self->authority || ()),
41 Class::MOP::Module - Module Meta Object
45 This is an abstraction of a Perl 5 module, it is a superclass of
46 L<Class::MOP::Class>. A module essentially a package with metadata,
47 in our case the version and authority.
55 Returns a metaclass for this package.
57 =item B<initialize ($package_name)>
59 This will initialize a Class::MOP::Module instance which represents
60 the module of C<$package_name>.
64 This is a read-only attribute which returns the C<$VERSION> of the
65 package for the given instance.
69 This is a read-only attribute which returns the C<$AUTHORITY> of the
70 package for the given instance.
74 This constructs a string of the name, version and authority.
80 Stevan Little E<lt>stevan@iinteractive.comE<gt>
82 =head1 COPYRIGHT AND LICENSE
84 Copyright 2006-2008 by Infinity Interactive, Inc.
86 L<http://www.iinteractive.com>
88 This library is free software; you can redistribute it and/or modify
89 it under the same terms as Perl itself.