my $name = param("name"); if ($name eq "") { print qq(Sorry, name can't be empty); exit; } print "Thank you, $name. Your submission is complete.";