in reply to Re^4: Perl OOPin thread Perl OOP
Ehhhhhhhhhhhhhhh…
package Example::Phone { use Moo; has number => (is => 'ro', required => 1); sub call { ... } sub BUILD { use MooseX::Final; assert_final( my $self = shift ); } } [download]