#!/usr/bin/perl use strict; use warnings; my $one; my $two; my $sum; print "Sum Program\n"; print "----------------------\n"; print "First Num: "; $one = ; chomp($one); # remove new line print "Second Num: "; $two = ; chomp($two); # remove new line $sum = $one + $two; print "$one + $two = $sum\n\n\n";