sub autoSubmit{ print "Would you like the logs submitted? Y\\N?: "; my $autoSubmit = getInput; if ( (lc($autoSubmit) ne "y") and ($autoSubmit ne "n")) { print "You did not enter in Yes or No. Please try again\n"; $autoSubmit = autoSubmit(); } return $autoSubmit; } #### sub autoSubmit{ print "Would you like the logs submitted? Y\\N?: "; my $autoSubmit; while (1) { $autoSubmit = getInput; last if ( (lc($autoSubmit) eq "y") or ($autoSubmit eq "n")); print "You did not enter in Yes or No. Please try again\n"; } return $autoSubmit; }