Estoy utilizando este script para hacer envio de emails mediante un SMTP externo:
Código:
El script ya me funciono, el problema es que solo puede hacer el envio de 3 mails y despues me aparecio este error, y ya no funciono mas:#!/usr/bin/perl use lib('lib'); use CGI::Carp qw(fatalsToBrowser); use MIME::Lite; use Authen::SASL; use strict; my($user)='[email protected]'; my($pass)='mipass'; my($host)='00.00.00.000'; my $msg = MIME::Lite->new( From =>'[email protected]', To =>'[email protected]', Subject =>'CGI email', Data =>"FUNCIONA" ); MIME::Lite->send('smtp', $host, AuthUser=>$user, AuthPass=>$pass); $msg->send;
Código:
Y no encuentro informacion sobre el tema en ninguna parte. AYUDA. Unknown callback: 'authname'. (user|auth|language|pass)