perl -e 'my $x = 10; $x = "2" . $x; print $x + 0'