[EMAIL PROTECTED] said:
> if you do:
> perl -e '$a="beta"; *$a=sub{print("xxx")}; beta()'
> works and print "xxx"
>
> if you do:
> perl -e 'use strict; my $a="beta"; *$a=sub{print("xxx")}; beta()'
> don't works
>
> Who do I resolve this problem
Don't use strict.
Or more specifically, don't use
if you do:
perl -e '$a="beta"; *$a=sub{print("xxx")}; beta()'
works and print "xxx"
if you do:
perl -e 'use strict; my $a="beta"; *$a=sub{print("xxx")}; beta()'
don't works
Who do I resolve this problem
Thanks
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL