print "Enter the first number: "; my $a = <>; print "Enter the second number: "; my $b = <>; print "The sum of $a and $b is " . ($a + $b) . "\n";