Re: Implementing perl BEGIN blocks

[Autrijus Tang]

On Thu, Aug 18, 2005 at 06:00:43PM +0200, Leopold Toetsch wrote:
> This shouldn't be a problem (at least when the last few globals from 
> imcc are gone), i.e. compilation / running code should be fully re-rentrant.

Oooh, that will be much better.

> BTW can you explain why the above example prints 5?

That was a typo.  Something like this may illustrate the issue better:

    my $a;
    { my $b; BEGIN { $a = { say $b++ } } }

Thanks,
/Autrijus/

pgpvPARUfK4wl.pgp
Description: PGP signature