/usr/share/perl5/MooseX/FollowPBP.pm is in libmoosex-followpbp-perl 0.05-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 | package MooseX::FollowPBP;
BEGIN {
$MooseX::FollowPBP::VERSION = '0.05';
}
use strict;
use warnings;
use Moose 0.94 ();
use Moose::Exporter;
use Moose::Util::MetaRole;
use MooseX::FollowPBP::Role::Attribute;
my %metaroles = (
class_metaroles => {
attribute => ['MooseX::FollowPBP::Role::Attribute'],
},
);
$metaroles{role_metaroles} = {
applied_attribute => ['MooseX::FollowPBP::Role::Attribute'],
} if $Moose::VERSION >= 1.9900;
Moose::Exporter->setup_import_methods(%metaroles);
1;
# ABSTRACT: Name your accessors get_foo() and set_foo()
=pod
=head1 NAME
MooseX::FollowPBP - Name your accessors get_foo() and set_foo()
=head1 VERSION
version 0.05
=head1 SYNOPSIS
use Moose;
use MooseX::FollowPBP;
# make some attributes
=head1 DESCRIPTION
This module does not provide any methods. Simply loading it changes
the default naming policy for the loading class so that accessors are
separated into get and set methods. The get methods are prefixed with
"get_" as the accessor, while set methods are prefixed with
"set_". This is the naming style recommended by Damian Conway in
I<Perl Best Practices>.
If you define an attribute with a leading underscore, then both the
get and set method will also have an underscore prefix.
If you explicitly set a "reader" or "writer" name when creating an
attribute, then that attribute's naming scheme is left unchanged.
=head1 ACCESSORS IN ROLES
Prior to version 1.9900 of L<Moose>, attributes added to a class ended up with
that class's attribute traits. That means that if your class used
C<MooseX::FollowPBP>, any attributes provided by roles you consumed had the
semi-affordance style of accessor.
As of Moose 1.9900, that is no longer the case. Attributes provided by roles
no longer acquire the consuming class's attribute traits. However, with Moose
1.9900+, you can now use C<MooseX::FollowPBP> directly in roles. Attributes
defined by that role will have semi-affordance style accessors, regardless of
what attribute traits the consuming class has.
=head1 BUGS
Please report any bugs or feature requests to
C<bug-moosex-followpbp@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__
|