my ($x, $y) = (1, 2);
is($x, 2, 'x');
is($y, 3, 'y');
$x += 4;
is($x, 6, '+=');