Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Mail::Sendmail

0 views
Skip to first unread message

Oreste

unread,
Jul 16, 2008, 8:59:48 PM7/16/08
to
Uso questo semplice modulo perché è disponibile anche in ActivePerl
5.8. Ho usato con successo il modulo Mail::Mailer che preferisco, ma
non è disponibile in ActivePerl 5.8.
ActivePerl 5.8 è la release che funziona sotto Vista, quella
successiva 5.10 non funziona, l'ho capito dopo un tot di notti
insonni.

Mail::Sendmail mi da sempre degli errori, al fine di evitare che si
possano vedere pezzi di programma in rete, attivo il comando exit ad
ogni errore.

Qualcuno ha esperienza d'uso di questo modulo? Ho l'impressione che mi
sfugga qualcosa.

il link è

http://search.cpan.org/~mivkovic/Mail-Sendmail-0.79/Sendmail.pm

Ho inserito la chiamata al modulo in una mia libreria.pm nel modo
seguente:

use Mail::Sendmail;

# ------------------- inizio sub invia_email
------------------------------
# parametri in entrata:
# indirizzo email mittente
# indirizzo email ricevente
# oggetto
# messaggio
sub invia_email {
my $da = shift;
my $a = shift;
my $ogg = shift;
my $msg = shift;
my %mail = ( To=>$a, From=>$da, Subject=>$ogg, Message=>$msg );
$mail{Smtp} = 'mail.server.xxx';
sendmail(%mail) or exit errore('Errore invio emai','La connessione al
server di posta elettronica non funziona');
}
# ------------------- fine sub invia_email
--------------------------------

Sembra tutto regolare ma non funziona.

Saluti

oreste.parlatano.com

Andrea Maestrutti

unread,
Jul 17, 2008, 3:32:57 AM7/17/08
to
In realtà la mia non è una risposta, ma un consiglio.

Dopo aver provato vari moduli, tra cui Mail::Sender e Mail::Sendmail, su
win32 mi sono trovato bene con Email::Send . Lo trovi con PPM e ...
almeno a me va ;)

Oreste

unread,
Jul 18, 2008, 10:30:20 AM7/18/08
to

Grazie della segnalazione, lo installo subito.

Peccato per Mail::Mailer funziona molto bene sotto Unix/Linux.

0 new messages