Envoi mail perl

**marie4449** · 14/03/2007, 10h28

bonjour,
j'essai d'envoyer des mail a partir de mon programme PERL, le script de base ne fonctionne pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
$mail = "marie4449@laposte.net";
$contenu = " blabla ";
	my $Message = new MIME::Lite
 
	  From    => "$mail",
	  To      => "$mail",
	  Subject => "Mail test",
	  Type    => 'TEXT',
	  Data    => "$contenu";
 
 
	$Message->send;