my $str = '123';
$str += 10;
print "str = /$str/\n";

my $num = 456;
$num =~ s/6/8/;
print "num = /$num/\n";