my $a = 4;
my $b = ++$a;
$b = $a++
