Here is some revelation
print 2, because *BAR::ONE (SCALAR slot included ) is aliased to *FOO::ONE
perl -e" $FOO::ONE = 1; *BAR::ONE = *FOO::ONE ; $BAR::ONE = 2; print +$FOO::ONE "
prints 1 because *BAR::ONE slots isn't aliased to *FOO::ONE slots
$ perl -e" $FOO::ONE = 1; *BAR:: = *FOO:: ; $BAR::ONE = 2; print $FOO +::ONE 1
In reply to Re: symboltable problem
by Anonymous Monk
in thread symboltable problem
by morgon
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |