buenos dias a todoooosss
tengo un problema con perl, estoy creando un script para enviar email desde perl, pero yo no tengo instalado en mi servidor linux sendmail, sino postfix por mayor comodida, pero cada vez q lo mando a correr me sale este error
Código:
connect() failed: Descriptor de fichero erróneo
mi script en perl es:
Código:
#!/usr/bin/perl -w
use strict;
use warnings;
use Mail::Sender;
my $sender = new Mail::Sender
{smtp => 'mail.tel.net', from => 'mjroman\@tel.net'};
my $err = $Mail::Sender::Error;
my $sendto = "mjroman\@tel.net";
my $copys = "mjroman\@tel.net";
my $subject = "prueba";
my $message = "esto es una prueba";
if($sender->MailMsg({to => $sendto,
cc => $copys,
subject => $subject,
msg => $message })<0)
{
die "$Mail::Sender::Error\n";
}
print "Mail sent OK.";
#$err = $Mail::Sender::Error;
#$sender->Close;
y noc q hago mal porq no me señala ninguna linea en el error, a alguien le ha pasado esto??