#!/usr/local/bin/perl print STDOUT "Enter the first number: "; $n1 = ; print STDOUT "Enter the second number: "; $n2 = ; chop ( $n1 ); chop ( $n2 ); print STDOUT $n1, " + ", $n2, " = ", $n1 + $n2, "\n";