Mega Code Archive

 

Categories / Perl / Language Basics

 

Read input from keyboard

print "Please enter first number:\n"; $number1 = <STDIN>; chomp $number1; print "Please enter second number:\n"; $number2 = <STDIN>; chomp $number2; $sum = $number1 + $number2; print "The sum is $sum.\n";