Select Code to Download

my $str = '123';
$str += 10;
...
my $num = 456;
$num =~ s/6/8/;
print "num = /$num/\n";

str = /133/
num = /458/