use strict;
use warnings;
my $x = "2abc";
my $y = $x + 42;
print "x=", $x, " y=", $y, "\n";