Server : Apache/2.4.43 (Win64) OpenSSL/1.1.1g PHP/7.4.6 System : Windows NT USER-PC 6.1 build 7601 (Windows 7 Professional Edition Service Pack 1) AMD64 User : User ( 0) PHP Version : 7.4.6 Disable Function : NONE Directory : C:/xampp/perl/vendor/lib/MooseX/ |
package MooseX::ClassAttribute; BEGIN { $MooseX::ClassAttribute::VERSION = '0.26'; } use strict; use warnings; use Moose 1.23 (); use Moose::Exporter; use Moose::Util; use MooseX::ClassAttribute::Trait::Class; use MooseX::ClassAttribute::Trait::Role; use MooseX::ClassAttribute::Trait::Application::ToClass; use MooseX::ClassAttribute::Trait::Application::ToRole; Moose::Exporter->setup_import_methods( with_meta => ['class_has'], class_metaroles => { class => ['MooseX::ClassAttribute::Trait::Class'], }, role_metaroles => { role => ['MooseX::ClassAttribute::Trait::Role'], application_to_class => ['MooseX::ClassAttribute::Trait::Application::ToClass'], application_to_role => ['MooseX::ClassAttribute::Trait::Application::ToRole'], }, ); sub class_has { my $meta = shift; my $name = shift; my $attrs = ref $name eq 'ARRAY' ? $name : [$name]; my %options = ( definition_context => Moose::Util::_caller_info(), @_ ); $meta->add_class_attribute( $_, %options ) for @{$attrs}; } 1; # ABSTRACT: Declare class attributes Moose-style =pod =head1 NAME MooseX::ClassAttribute - Declare class attributes Moose-style =head1 VERSION version 0.26 =head1 SYNOPSIS package My::Class; use Moose; use MooseX::ClassAttribute; class_has 'Cache' => ( is => 'rw', isa => 'HashRef', default => sub { {} }, ); __PACKAGE__->meta()->make_immutable(); no Moose; no MooseX::ClassAttribute; # then later ... My::Class->Cache()->{thing} = ...; =head1 DESCRIPTION This module allows you to declare class attributes in exactly the same way as object attributes, using C<class_has()> instead of C<has()>. You can use any feature of Moose's attribute declarations, including overriding a parent's attributes, delegation (C<handles>), attribute traits, etc. All features should just work. The one exception is the "required" flag, which is not allowed for class attributes. The accessor methods for class attribute may be called on the class directly, or on objects of that class. Passing a class attribute to the constructor will not set that attribute. =head1 FUNCTIONS This class exports one function when you use it, C<class_has()>. This works exactly like Moose's C<has()>, but it declares class attributes. One little nit is that if you include C<no Moose> in your class, you won't remove the C<class_has()> function. To do that you must include C<no MooseX::ClassAttribute> as well. Or you can just use L<namespace::autoclean> instead. =head2 Implementation and Immutability This module will add a role to your class's metaclass, See L<MooseX::ClassAttribute::Trait::Class> for details. This role provides introspection methods for class attributes. Class attributes themselves do the L<MooseX::ClassAttribute::Trait::Attribute> role. =head2 Cooperation with Metaclasses and Traits This module should work with most attribute metaclasses and traits, but it's possible that conflicts could occur. This module has been tested to work with Moose's native traits. =head2 Class Attributes in Roles You can add a class attribute to a role. When that role is applied to a class, the class will have the relevant class attributes added. Note that attribute defaults will be calculated when the class attribute is composed into the class. =head1 DONATIONS If you'd like to thank me for the work I've done on this module, please consider making a "donation" to me via PayPal. I spend a lot of free time creating free software, and would appreciate any support you'd care to offer. Please note that B<I am not suggesting that you must do this> in order for me to continue working on this particular software. I will continue to do so, inasmuch as I have in the past, for as long as it interests me. Similarly, a donation made in this way will probably not make me work on this software much more, unless I get so many donations that I can consider working on free software full time, which seems unlikely at best. To donate, log into PayPal and send money to autarch@urth.org or use the button on this page: L<http://www.urth.org/~autarch/fs-donation.html> =head1 BUGS Please report any bugs or feature requests to C<bug-moosex-classattribute@rt.cpan.org>, or through the web interface at L<http://rt.cpan.org>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. =head1 AUTHOR Dave Rolsky <autarch@urth.org> =head1 COPYRIGHT AND LICENSE This software is Copyright (c) 2011 by Dave Rolsky. This is free software, licensed under: The Artistic License 2.0 (GPL Compatible) =cut __END__