c:\@Work\Perl\monks>perl -wMstrict -le
"my ($x, $y, $z) = (30, 40, 50);
 ($x, $y, $z) += (3, 4, 5);
 print qq{$x, $y, $z};
"
Useless use of a constant in void context at -e line 1.
Useless use of a constant in void context at -e line 1.
Useless use of private variable in void context at -e line 1.
Useless use of private variable in void context at -e line 1.
30, 40, 55