#!/usr/bin/perl
       
my $x = 123;
my $x1;
print $x + $x1;