NAME

Class::Data::Lazy - Create class data with laziness.

SYNOPSIS

    use Class::Data::Lazy qw(
        foo
    );

Is equivalent to:

    sub foo {
        my $class = shift;
        my $value = $class->_build_foo;
        *{"${class}::foo"} = sub { $value };
        return $value;
    }

DESCRIPTION

Class::Data::Lazy is lazy class data maker.

I want to write lazy class accessor.

MOTIVATION

When I'm writing a context class for web application, some thing need lazy building.

For example:

    package MyApp;

    use Class::Data::Lazy qw(
        memcached
    );

    sub _build_memcached {
        my $class = shift;
        my $conf = $class->config->{'Cache::Memcached::Fast'}
            or die "Missing configuration for Cache::Memcached::Fast";
        Cache::Memcached::Fast->new($conf);
    }

Q. Why should it be lazy class method?

A. Because $class->config is not available when the class is loading.

LICENSE

Copyright (C) tokuhirom.

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

AUTHOR

tokuhirom <tokuhirom@gmail.com>

SEE ALSO

If you wan to declare the lazy instance accessor, please try Class::Accessor::Lite::Lazy.