Discussion :

[black_code]

Voila je suis derrière un proxy qui necessite une authentification « login et password »
Je sais comment faire pour me connecter via LWP ::UserAgent http://www.developpez.net/forums/viewtopic.php?t=444871

Mais je ne sais pas comment faire pour me connecter à un serveur pop3 via le proxy

Mon code pour la connexion au serveur pop3 est le suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
use strict;
use Net::POP3;
use Email::Simple;
 
print "please give me the address of your pop server : ";
my $server=<STDIN>;
print "\nplease give me your login : ";
my $login=<STDIN>;
print "\nplease give your password : ";
my $passwd=<STDIN>;
$|=1;
print "\nconnecting to $server...";
my $pop=new Net::POP3 $server
	or die "ERROR : can't connect to $server : $!\n\n";
print "[OK]\n";
$pop->login($login,$passwd);
$pop->ok or die "ERROR : wong name or password\n\n";
print "Connexion [OK]\n";
$pop->quit;

merci d'avance.