Help for this page

Select Code to Download


  1. or download this
    package MyClass;
    use Any::Moose;
    use Foo::Heavy; # slows startup!
    has foo => (is => 'ro', default => sub { Foo::Heavy->new });
    
  2. or download this
    sub foo {
        my ($self) = @_;
        state $foo;
    ...
        }
        $foo;
    }