C:\>perl -e "my $var = 'tata';print ++$var"
tatb