RO var vrs expectations

[-Sx- IUDICIUM]

A better example:

perl -le '(*a,*b,*c)=(\1,\2,\3); for ( @x = ($a,$b,$c) ) { $_++; 
print } print "$a $b $c"'

2
3
4
1 2 3

(The above is from Steve Lane :)

Note that the original 'constants' are NOT being changed.

-Sx- :]