Re: my $pi is constant = 3;

[Autrijus Tang]

On Fri, Aug 19, 2005 at 01:36:30AM +0800, Autrijus Tang wrote:
>     BEGIN {
>       &foo := a Sub is stub {
>           ($a) := &?Internals::GETARGS();
>           $a = 1 unless exists $a;
>           # real body begins here
>           ...
>       };
>     }

Er, sorry, the ($a) would need a my() scope identifier, as with all
parameters and hoisted mid-block my() declarations.

Also, "a Sub" should read "a sub".

Thanks,
/Autrijus/

pgp58rqXRSVNR.pgp
Description: PGP signature