Class::Accessor::Lite::Lazy - Class::Accessor::Lite with lazy accessor feature

package MyPackage;

use Class::Accessor::Lite::Lazy (
    rw_lazy => [
      # implicit builder method name is "_build_foo"
      qw(foo foo2),
      # or specify builder explicitly
      {
        xxx => 'method_name',
        yyy => sub {
          my $self = shift;
          ...
        },
      }
    ],
    ro_lazy => [ qw(bar) ],
    # Class::Accessor::Lite functionality is also available
    new => 1,
    rw  => [ qw(baz) ],
);

# or if you specify all attributes' builders explicitly
use Class::Accessor::Lite::Lazy (
    rw_lazy => {
      foo => '_build_foo',
      bar => \&_build_bar,
    }
);

sub _build_foo {
    my $self = shift;
    ...
}

sub _build_bar {
    my $self = shift;
    ...
}

Class::Accessor::Lite::Lazy provides a "lazy" accessor feature to Class::Accessor::Lite.

If a lazy accessor without any value set is called, a builder method is called to generate a value to set.

As Class::Accessor::Lite, the use statement provides the way to create lazy accessors.

• rw_lazy => \@name_of_the_properties | \%properties_and_builders

  Creates read / write lazy accessors.

• ro_lazy => \@name_of_the_properties | \%properties_and_builders

  Creates read-only lazy accessors.

• new, rw, ro, wo

  Same as Class::Accessor::Lite.

• Class::Accessor::Lite::Lazy->mk_lazy_accessors(@name_of_the_properties)

  Creates lazy accessors in current package.

• Class::Accessor::Lite::Lazy->mk_ro_lazy_accessors(@name_of_the_properties)

  Creates read-only lazy accessors in current package.

As seen in SYNOPSIS, each attribute is specified by either a string or a hashref.

In the string form $attr you specify builders implicitly, the builder method name for the attribute $attr is named _build_$attr.

In the hashref form { $attr => $method_name | \&builder } you can explicitly specify builders, each key is the attribute name and each value is either a string which specifies the builder method name or a coderef itself.

motemen [email protected]

Class::Accessor::Lite

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.