Alguien me puede ayudar con este error.
Estoy utilizando este script para hacer envio de emails mediante un SMTP externo:
Código:
#!/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;
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:
Código:
Unknown callback: 'authname'. (user|auth|language|pass)
Y no encuentro informacion sobre el tema en ninguna parte. AYUDA.