Olá! bt707,
Antes de mais nada, eu sugeriria que você não se incomodasse com criação do HTML se etiquetasse mas uso preferivelmente o CGI.pm muito padrão (
http://perldoc.perl.org/CGI.html). Garantirá que você produz sempre HTML well-formed.
Re: seus erros “de falta”, o que você precisa são coletam todos os erros em uma disposição:
se (eq de $in {correio} '') {impulso (@missing, “necessidade de incorporar um válido \ um “email address \ "")}
se (eq de $in {gerente} '') {impulso (@missing, “necessidade de incorporar um válido \ um “gerente \” (gerente) ")}
se (eq de $in {c} '') {impulso (@missing, “necessidade para incorporar um válido \ um “país \” um (c) e \ “cidade \” (l) “)}
E imprimi-los então todos using qualquer outra coisa semelhante:
meu $errorHtml = juntam-se ("", o mapa {“
$_“} @missing);
e substituir o seu
$missingcom $errorHtml
Boa sorte!