@restrictTo debe contener el dominio desde donde se van a enviar los correos. Ahora lo tienes puesto a 'all', que está bien MIENTRAS hagas pruebas. Luego pones el definitivo.
En caso de error, el programa devuelve un fichero de texto, como se vé en los prints que hay en la función output. No manda un correo.
$toEmail guarda la dirección por defecto donde enviar los correos, si no se ha indicado ninguna en la página web. PERO aquí veo un problema. Actualmente la línea es
Código:
$toEmail = 'info\@envatech.net';
pero debería ser esto:
o esto:
Código:
$toEmail = "info\@envatech.net";
En Perl es muy importante el tema de las comillas. Si se ponen comillas dobles, Perl intentará interpretar el contenido (las variables que haya dentro). Como la '@' puede indicar un posible comienzo de variable -y en nuestro caso NO es así porque forma parte de un correo electrónico-, debemos 'escaparla' poniendo una '\' delante de ella. Si se ponen comillas simples, Perl interpretará el contenido entrecomillado de forma literal, por lo que la '\' sobraba. De hecho, es posible que este haya sido el fallo, porque a la hora de enviar el correo electrónico, lo habrá hecho hacia
info\@envatech.net.
Finalmente,
$sendMailProg = '/var/qmail/bin/sendmail'; indico dónde está el sendmail, que es el programa que, en el servidor, mandará el correo. Si no sabes si está o dónde está instalado, prueba con
$sendMailProg = 'sendmail';
A ver si con eso te funciona. Si no, pregunta al administrador del servidor si tiene instalado el sendmail. Si el administrador no sabe responder a esa pregunta, cambia de servidor inmediatamente.