my $a = 2;
$_++ for 1..2;
print "$a\n";