Select Code to Download

$v += $v;
print "$v\n";

my $x = 'A';
++$x;
print "$x\n";

use warnings;
use strict;
...

$v += $v;
print "$v\n";

0099
100
200