use warnings;
use strict;

my $x = 123;
my $y = $x + 10;
print $y;