perl 5.0 alpha 8
[p5sagit/p5-mst-13.2.git] / Bugs / clobberref
1 $B = [X, Y]; $B = 1; print $B