=head2 Examples
-Let's say that you want to additional properties to
+Let's say that you want to add additional properties to
attributes. Specifically, we want to add a "label" property to each
attribute, so we can write C<<
My::Class->meta()->get_attribute('size')->label() >>. The first two
The C<get_attribute_list> method returns a list of attribute names. You can
then use C<get_attribute> to get the L<Moose::Meta::Attribute> object itself.
-Once you this meta-attribute object, you can call methods on it like this:
+Once you have this meta-attribute object, you can call methods on it like this:
print $point->meta->get_attribute('x')->type_constraint;
=> Int
=head1 RECIPE REVIEW
-We start by creating a new attribute metaclass.
+We start by creating a new attribute metaclass.
package MyApp::Meta::Attribute::Labeled;
use Moose;
A custom method metaclass lets us add both behavior and
meta-information to methods. Unfortunately, because the Perl
-interpreter does not private easy hooks into method declaration, the
+interpreter does not provide easy hooks into method declaration, the
API we have for adding these methods is not very pretty.
That can be improved with custom Moose-like sugar, or even by using a