Help for this page

Select Code to Download


  1. or download this
    package Foo {
        use Moo;
    ...
        has 'attr_B' => ( is => 'ro', default => sub { 'B' } );
        has 'attr_C' => ( is => 'ro', isa => sub { die unless $_[0] > 0 } 
    +);
    }
    
  2. or download this
    package Foo {
        use Moo;
    ...
        has 'attr_B' => ( default => sub { 'B' } );
        has 'attr_C' => ( isa => sub { die unless $_[0] > 0 } );
    }