my $var = 1 ; $var = $var + 1 ;