Memoize-Once

 view release on metacpan or  search on metacpan

t/hint_in.t  view on Meta::CPAN

use warnings;
use strict;

package Foo;

use Test::More tests => 3;

BEGIN { use_ok "Memoize::Once", qw(once); }

sub cc() { once(__PACKAGE__) }
is cc(), "Foo";
is cc(), "Foo";

1;



( run in 1.901 second using v1.01-cache-2.11-cpan-54e63673c56 )