#!/usr/bin/perl print "\nDo you want to use add or minus: "; $lawl = ; chomp $lawl; print "Enter your first number: "; $num1 = ; chomp $num1; print "Enter you second number: "; $num2 = ; chomp $num2; if ($lawl eq 'add') { print "$num1" + "$num2"; print "\n\n"; } elsif ($lawl eq 'minus') { print "$num1" - "$num2"; print "\n\n"; }