Le Fri, 03 Dec 2004 22:34:23 +0100, "news.free.fr" a écrit :
Quelqu un pourrait me dire ce qui ne va pas ?
La gestion d'erreurs. Il est indispensable de tester le retour de la connection au serveur et de l'envoi du courriel. -- Patrick Texier
jerome
Patrick Texier wrote:
Le Fri, 03 Dec 2004 22:34:23 +0100, "news.free.fr"
Quelqu un pourrait me dire ce qui ne va pas ?
La gestion d'erreurs. Il est indispensable de tester le retour de la connection au serveur et de l'envoi du courriel.
Ok ! Merci Patrick.
Aurais tu un exemple a me proposer, je debute avec perl et j essaye de comprendre son fonctionnement a partir d exemple que j ai pu trouver sur le net.
Patrick Texier wrote:
Le Fri, 03 Dec 2004 22:34:23 +0100, "news.free.fr"
Quelqu un pourrait me dire ce qui ne va pas ?
La gestion d'erreurs. Il est indispensable de tester le retour de la
connection au serveur et de l'envoi du courriel.
Ok ! Merci Patrick.
Aurais tu un exemple a me proposer, je debute avec perl et j essaye de
comprendre son fonctionnement a partir d exemple que j ai pu trouver sur
le net.
Le Fri, 03 Dec 2004 22:34:23 +0100, "news.free.fr"
Quelqu un pourrait me dire ce qui ne va pas ?
La gestion d'erreurs. Il est indispensable de tester le retour de la connection au serveur et de l'envoi du courriel.
Ok ! Merci Patrick.
Aurais tu un exemple a me proposer, je debute avec perl et j essaye de comprendre son fonctionnement a partir d exemple que j ai pu trouver sur le net.
Scetbon Cyril
news.free.fr wrote:
Bonjour,
J ai trouve le script suivant :
use Net::SMTP;
my ($to_user, $from_user, $mailserver);
# Gather our input from the user print "Your E-mail Server's hostname:"; $mailserver = <STDIN>; print "To: "; $to_user = <STDIN>; print "From: "; $from_user = <STDIN>;
# Make sure to remove any trailing n or r characters chomp($mailserver); chomp($to_user); chomp($from_user);
# Create our SMTP connection my $smtp = Net::SMTP->new("$mailserver") or die "Can't create smtp: $!n"; tu peux aussi tester le mode debug :
my $smtp = Net::SMTP->new("$mailserver",Debug=>1) or die "Can't create smtp: $!n";
# Tell our mail server what user we are sending as $smtp->mail($from_user);
# Tell it who we are trying to send to $smtp->to($to_user);
# Start actuallly sending the body of our message $smtp->data(); $smtp->datasend("nHello World!n"); $smtp->dataend(); $smtp->quit;
sense envoyer un mail. Mais je n arrive pas a envoyer de mail avec free. Pourtant le nom du server free est bien smtp.free.fr
Quelqu un pourrait me dire ce qui ne va pas ?
Merci.
news.free.fr wrote:
Bonjour,
J ai trouve le script suivant :
use Net::SMTP;
my ($to_user, $from_user, $mailserver);
# Gather our input from the user
print "Your E-mail Server's hostname:";
$mailserver = <STDIN>;
print "To: ";
$to_user = <STDIN>;
print "From: ";
$from_user = <STDIN>;
# Make sure to remove any trailing n or r characters
chomp($mailserver);
chomp($to_user);
chomp($from_user);
# Create our SMTP connection
my $smtp = Net::SMTP->new("$mailserver") or die "Can't create smtp: $!n";
tu peux aussi tester le mode debug :
my $smtp = Net::SMTP->new("$mailserver",Debug=>1) or die "Can't create
smtp: $!n";
# Tell our mail server what user we are sending as
$smtp->mail($from_user);
# Tell it who we are trying to send to
$smtp->to($to_user);
# Start actuallly sending the body of our message
$smtp->data();
$smtp->datasend("nHello World!n");
$smtp->dataend();
$smtp->quit;
sense envoyer un mail.
Mais je n arrive pas a envoyer de mail avec free.
Pourtant le nom du server free est bien smtp.free.fr
# Gather our input from the user print "Your E-mail Server's hostname:"; $mailserver = <STDIN>; print "To: "; $to_user = <STDIN>; print "From: "; $from_user = <STDIN>;
# Make sure to remove any trailing n or r characters chomp($mailserver); chomp($to_user); chomp($from_user);
# Create our SMTP connection my $smtp = Net::SMTP->new("$mailserver") or die "Can't create smtp: $!n"; tu peux aussi tester le mode debug :
my $smtp = Net::SMTP->new("$mailserver",Debug=>1) or die "Can't create smtp: $!n";
# Tell our mail server what user we are sending as $smtp->mail($from_user);
# Tell it who we are trying to send to $smtp->to($to_user);
# Start actuallly sending the body of our message $smtp->data(); $smtp->datasend("nHello World!n"); $smtp->dataend(); $smtp->quit;
sense envoyer un mail. Mais je n arrive pas a envoyer de mail avec free. Pourtant le nom du server free est bien smtp.free.fr
Quelqu un pourrait me dire ce qui ne va pas ?
Merci.
jerome
Merci, j ai trouve mon erreur !
En fait ca marche tres bien, mais le mail met beaucoup de temps a arriver ... Je ne comprends pas pourquoi ca un mail envoye avec thunderbird arrive quasiment immediatement.
Mais le principal c est que cela finisse par arriver. Maintenant il faut que je trouve un moyen d y attacher une piece jointe.
Le but de mon programme est d aller telecharger chaque matin le metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot. :o)
Encore merci Cyril !
news.free.fr wrote:
Bonjour,
J ai trouve le script suivant :
use Net::SMTP;
my ($to_user, $from_user, $mailserver);
# Gather our input from the user print "Your E-mail Server's hostname:"; $mailserver = <STDIN>; print "To: "; $to_user = <STDIN>; print "From: "; $from_user = <STDIN>;
# Make sure to remove any trailing n or r characters chomp($mailserver); chomp($to_user); chomp($from_user);
# Create our SMTP connection my $smtp = Net::SMTP->new("$mailserver") or die "Can't create smtp: $!n";
tu peux aussi tester le mode debug : my $smtp = Net::SMTP->new("$mailserver",Debug=>1) or die "Can't create smtp: $!n";
# Tell our mail server what user we are sending as $smtp->mail($from_user);
# Tell it who we are trying to send to $smtp->to($to_user);
# Start actuallly sending the body of our message $smtp->data(); $smtp->datasend("nHello World!n"); $smtp->dataend(); $smtp->quit;
sense envoyer un mail. Mais je n arrive pas a envoyer de mail avec free. Pourtant le nom du server free est bien smtp.free.fr
Quelqu un pourrait me dire ce qui ne va pas ?
Merci.
Merci, j ai trouve mon erreur !
En fait ca marche tres bien, mais le mail met beaucoup de temps a
arriver ... Je ne comprends pas pourquoi ca un mail envoye avec
thunderbird arrive quasiment immediatement.
Mais le principal c est que cela finisse par arriver.
Maintenant il faut que je trouve un moyen d y attacher une piece jointe.
Le but de mon programme est d aller telecharger chaque matin le
metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot.
:o)
Encore merci Cyril !
news.free.fr wrote:
Bonjour,
J ai trouve le script suivant :
use Net::SMTP;
my ($to_user, $from_user, $mailserver);
# Gather our input from the user
print "Your E-mail Server's hostname:";
$mailserver = <STDIN>;
print "To: ";
$to_user = <STDIN>;
print "From: ";
$from_user = <STDIN>;
# Make sure to remove any trailing n or r characters
chomp($mailserver);
chomp($to_user);
chomp($from_user);
# Create our SMTP connection
my $smtp = Net::SMTP->new("$mailserver") or die "Can't create smtp:
$!n";
tu peux aussi tester le mode debug :
my $smtp = Net::SMTP->new("$mailserver",Debug=>1) or die "Can't create
smtp: $!n";
# Tell our mail server what user we are sending as
$smtp->mail($from_user);
# Tell it who we are trying to send to
$smtp->to($to_user);
# Start actuallly sending the body of our message
$smtp->data();
$smtp->datasend("nHello World!n");
$smtp->dataend();
$smtp->quit;
sense envoyer un mail.
Mais je n arrive pas a envoyer de mail avec free.
Pourtant le nom du server free est bien smtp.free.fr
En fait ca marche tres bien, mais le mail met beaucoup de temps a arriver ... Je ne comprends pas pourquoi ca un mail envoye avec thunderbird arrive quasiment immediatement.
Mais le principal c est que cela finisse par arriver. Maintenant il faut que je trouve un moyen d y attacher une piece jointe.
Le but de mon programme est d aller telecharger chaque matin le metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot. :o)
Encore merci Cyril !
news.free.fr wrote:
Bonjour,
J ai trouve le script suivant :
use Net::SMTP;
my ($to_user, $from_user, $mailserver);
# Gather our input from the user print "Your E-mail Server's hostname:"; $mailserver = <STDIN>; print "To: "; $to_user = <STDIN>; print "From: "; $from_user = <STDIN>;
# Make sure to remove any trailing n or r characters chomp($mailserver); chomp($to_user); chomp($from_user);
# Create our SMTP connection my $smtp = Net::SMTP->new("$mailserver") or die "Can't create smtp: $!n";
tu peux aussi tester le mode debug : my $smtp = Net::SMTP->new("$mailserver",Debug=>1) or die "Can't create smtp: $!n";
# Tell our mail server what user we are sending as $smtp->mail($from_user);
# Tell it who we are trying to send to $smtp->to($to_user);
# Start actuallly sending the body of our message $smtp->data(); $smtp->datasend("nHello World!n"); $smtp->dataend(); $smtp->quit;
sense envoyer un mail. Mais je n arrive pas a envoyer de mail avec free. Pourtant le nom du server free est bien smtp.free.fr
Quelqu un pourrait me dire ce qui ne va pas ?
Merci.
Jean-Philippe Caruana
Le but de mon programme est d aller telecharger chaque matin le metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot.
a priori, les lignes de métro sont assez stables d'une nuit sur l'autre, il est rare qu'elles disparaissent ou modifient leur parcours pendant ce cours intervalle...
-- jpc http://www.enstimac.fr/~caruana/
Le but de mon programme est d aller telecharger chaque matin le
metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot.
a priori, les lignes de métro sont assez stables d'une nuit sur l'autre,
il est rare qu'elles disparaissent ou modifient leur parcours pendant ce
cours intervalle...
Le but de mon programme est d aller telecharger chaque matin le metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot.
a priori, les lignes de métro sont assez stables d'une nuit sur l'autre, il est rare qu'elles disparaissent ou modifient leur parcours pendant ce cours intervalle...
-- jpc http://www.enstimac.fr/~caruana/
Jérémy JUST
On Sat, 11 Dec 2004 10:59:39 +0100 jerome wrote:
Le but de mon programme est d aller telecharger chaque matin le metro.pdf sur le net
Il te faudra être capable d'ajouter une pièce jointe à ton message. Pour ça, le protocole SMTP ne t'aidera pas.
Par contre, il me semble avoir déjà utilisé Mail::Sender et/ou Mail::Internet très fructueusement dans ce but. L'envoi du mail est intégré, donc ton Net::SMTP ne te servira plus.
-- Jérémy JUST
On Sat, 11 Dec 2004 10:59:39 +0100
jerome <jerome.hourquebie@free.fr> wrote:
Le but de mon programme est d aller telecharger chaque matin le
metro.pdf sur le net
Il te faudra être capable d'ajouter une pièce jointe à ton message.
Pour ça, le protocole SMTP ne t'aidera pas.
Par contre, il me semble avoir déjà utilisé Mail::Sender et/ou
Mail::Internet très fructueusement dans ce but. L'envoi du mail est
intégré, donc ton Net::SMTP ne te servira plus.
Le but de mon programme est d aller telecharger chaque matin le metro.pdf sur le net
Il te faudra être capable d'ajouter une pièce jointe à ton message. Pour ça, le protocole SMTP ne t'aidera pas.
Par contre, il me semble avoir déjà utilisé Mail::Sender et/ou Mail::Internet très fructueusement dans ce but. L'envoi du mail est intégré, donc ton Net::SMTP ne te servira plus.
-- Jérémy JUST
Jérémy JUST
On Mon, 13 Dec 2004 09:53:20 +0100 Jean-Philippe Caruana wrote:
Le but de mon programme est d aller telecharger chaque matin le metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot. a priori, les lignes de métro sont assez stables d'une nuit sur
l'autre, il est rare qu'elles disparaissent ou modifient leur parcours pendant ce cours intervalle...
Certaines stations ferment pour plusieurs semaines, ou ferment plus tôt le soir pendant quelques mois... Des lignes sont prolongées, suspendues...
Mais je pense qu'il s'agit plutôt de ça: http://www.metrofrance.com/
-- Jérémy JUST
On Mon, 13 Dec 2004 09:53:20 +0100
Jean-Philippe Caruana <cf.site.web@pour.envoi> wrote:
Le but de mon programme est d aller telecharger chaque matin le
metro.pdf sur le net et de me l envoyer sur l adresse mail de mon
boulot.
a priori, les lignes de métro sont assez stables d'une nuit sur
l'autre, il est rare qu'elles disparaissent ou modifient leur parcours
pendant ce cours intervalle...
Certaines stations ferment pour plusieurs semaines, ou ferment plus
tôt le soir pendant quelques mois... Des lignes sont prolongées,
suspendues...
Mais je pense qu'il s'agit plutôt de ça:
http://www.metrofrance.com/
On Mon, 13 Dec 2004 09:53:20 +0100 Jean-Philippe Caruana wrote:
Le but de mon programme est d aller telecharger chaque matin le metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot. a priori, les lignes de métro sont assez stables d'une nuit sur
l'autre, il est rare qu'elles disparaissent ou modifient leur parcours pendant ce cours intervalle...
Certaines stations ferment pour plusieurs semaines, ou ferment plus tôt le soir pendant quelques mois... Des lignes sont prolongées, suspendues...
Mais je pense qu'il s'agit plutôt de ça: http://www.metrofrance.com/
-- Jérémy JUST
Scetbon Cyril
jerome wrote:
Merci, j ai trouve mon erreur !
En fait ca marche tres bien, mais le mail met beaucoup de temps a arriver ... Je ne comprends pas pourquoi ca un mail envoye avec thunderbird arrive quasiment immediatement.
Mais le principal c est que cela finisse par arriver. Maintenant il faut que je trouve un moyen d y attacher une piece jointe.
Le but de mon programme est d aller telecharger chaque matin le metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot. :o)
Encore merci Cyril ! Pas de quoi.
news.free.fr wrote:
Bonjour,
J ai trouve le script suivant :
use Net::SMTP;
my ($to_user, $from_user, $mailserver);
# Gather our input from the user print "Your E-mail Server's hostname:"; $mailserver = <STDIN>; print "To: "; $to_user = <STDIN>; print "From: "; $from_user = <STDIN>;
# Make sure to remove any trailing n or r characters chomp($mailserver); chomp($to_user); chomp($from_user);
# Create our SMTP connection my $smtp = Net::SMTP->new("$mailserver") or die "Can't create smtp: $!n";
tu peux aussi tester le mode debug : my $smtp = Net::SMTP->new("$mailserver",Debug=>1) or die "Can't create smtp: $!n";
# Tell our mail server what user we are sending as $smtp->mail($from_user);
# Tell it who we are trying to send to $smtp->to($to_user);
# Start actuallly sending the body of our message $smtp->data(); $smtp->datasend("nHello World!n"); $smtp->dataend(); $smtp->quit;
sense envoyer un mail. Mais je n arrive pas a envoyer de mail avec free. Pourtant le nom du server free est bien smtp.free.fr
Quelqu un pourrait me dire ce qui ne va pas ?
Merci.
jerome wrote:
Merci, j ai trouve mon erreur !
En fait ca marche tres bien, mais le mail met beaucoup de temps a
arriver ... Je ne comprends pas pourquoi ca un mail envoye avec
thunderbird arrive quasiment immediatement.
Mais le principal c est que cela finisse par arriver.
Maintenant il faut que je trouve un moyen d y attacher une piece jointe.
Le but de mon programme est d aller telecharger chaque matin le
metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot.
:o)
Encore merci Cyril !
Pas de quoi.
news.free.fr wrote:
Bonjour,
J ai trouve le script suivant :
use Net::SMTP;
my ($to_user, $from_user, $mailserver);
# Gather our input from the user
print "Your E-mail Server's hostname:";
$mailserver = <STDIN>;
print "To: ";
$to_user = <STDIN>;
print "From: ";
$from_user = <STDIN>;
# Make sure to remove any trailing n or r characters
chomp($mailserver);
chomp($to_user);
chomp($from_user);
# Create our SMTP connection
my $smtp = Net::SMTP->new("$mailserver") or die "Can't create smtp:
$!n";
tu peux aussi tester le mode debug :
my $smtp = Net::SMTP->new("$mailserver",Debug=>1) or die "Can't create
smtp: $!n";
# Tell our mail server what user we are sending as
$smtp->mail($from_user);
# Tell it who we are trying to send to
$smtp->to($to_user);
# Start actuallly sending the body of our message
$smtp->data();
$smtp->datasend("nHello World!n");
$smtp->dataend();
$smtp->quit;
sense envoyer un mail.
Mais je n arrive pas a envoyer de mail avec free.
Pourtant le nom du server free est bien smtp.free.fr
En fait ca marche tres bien, mais le mail met beaucoup de temps a arriver ... Je ne comprends pas pourquoi ca un mail envoye avec thunderbird arrive quasiment immediatement.
Mais le principal c est que cela finisse par arriver. Maintenant il faut que je trouve un moyen d y attacher une piece jointe.
Le but de mon programme est d aller telecharger chaque matin le metro.pdf sur le net et de me l envoyer sur l adresse mail de mon boulot. :o)
Encore merci Cyril ! Pas de quoi.
news.free.fr wrote:
Bonjour,
J ai trouve le script suivant :
use Net::SMTP;
my ($to_user, $from_user, $mailserver);
# Gather our input from the user print "Your E-mail Server's hostname:"; $mailserver = <STDIN>; print "To: "; $to_user = <STDIN>; print "From: "; $from_user = <STDIN>;
# Make sure to remove any trailing n or r characters chomp($mailserver); chomp($to_user); chomp($from_user);
# Create our SMTP connection my $smtp = Net::SMTP->new("$mailserver") or die "Can't create smtp: $!n";
tu peux aussi tester le mode debug : my $smtp = Net::SMTP->new("$mailserver",Debug=>1) or die "Can't create smtp: $!n";
# Tell our mail server what user we are sending as $smtp->mail($from_user);
# Tell it who we are trying to send to $smtp->to($to_user);
# Start actuallly sending the body of our message $smtp->data(); $smtp->datasend("nHello World!n"); $smtp->dataend(); $smtp->quit;
sense envoyer un mail. Mais je n arrive pas a envoyer de mail avec free. Pourtant le nom du server free est bien smtp.free.fr
