Formulaire simple e-mail de validation et de rétroaction avec Perl

! " ; If ( eq $ fnameErr " true " ) {print" Le premier champ de nom ne peut pas être vide! } If ( "true" de $ emailErr ) {print " Le champ email ne peut pas être vide! } If ( $ msgErr de " vrai " ) Le champ de message { print" ne peut pas être vide! } impression "