my $name = param("name"); # GOAL : ensure input values are valid if ($name eq "") { print qq(Sorry, name can't be empty); exit; } # CLAIM : all input values are valid # GOAL : process input values print "Thank you, $name. Your submission is complete.";