Bug #55671 for Scalar-Lazy: lazy { } 'init' is not lazy

Wed Mar 17 16:52:13 2010 cpan.pavel [...] kudinov.name - Ticket created

Subject:

lazy { } 'init' is not lazy

use Scalar::Lazy; $\="\n"; my $var = lazy { print 'call'; 'val' } 'init'; print 'code'; print $var; print $var; # without 'init': code call val call val # with 'init' it's not lazy at all and print: call code val val # instead of expected: code call val val

Wed Mar 17 17:00:44 2010 cpan.pavel [...] kudinov.name - Correspondence added

Срд Мар 17 16:52:13 2010, KUDINOV писал: Show quoted text

> use Scalar::Lazy; > $\="\n"; > my $var = lazy { print 'call'; 'val' } 'init'; > print 'code'; > print $var; > print $var; > > # without 'init': > code > call > val > call > val > > # with 'init' it's not lazy at all and print: > call > code > val > val > > # instead of expected: > code > call > val > val

p.s. IMHO there's should be short macro for lazy { } 'init', because this mode is expected by default (call on first read -> store result into internal cache -> fetch from cache on further reads)

Wed Mar 17 17:01:03 2010 cpan.pavel [...] kudinov.name - Status changed from 'new' to 'open'