package Moose::Exception::RequiredAttributeNeedsADefault; our $VERSION = '2.2010'; use Moose; extends 'Moose::Exception'; with 'Moose::Exception::Role::InvalidAttributeOptions'; sub _build_message { my $self = shift; "You cannot have a required attribute (".$self->attribute_name.") without a default, builder, or an init_arg"; } __PACKAGE__->meta->make_immutable; 1;