#!/usr/bin/perl
        
$x = 1;
$y = 2;
$z = $x + $y +3; 
print "and the sum is $z\n"; #will print: and the sum is 6