Bonjour,

Je suis entièrement débutante en PERL et je patouille dans un programme déjà écrit qui cherche simplement à joindre un site web et lire et interpréter la réponse du site .
Voici le code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
$url = new URI::URL($_url);
	my $ua  = new LWP::UserAgent;
$ua->timeout(2000);
	my $resp = $ua->get($url);
	my $content = $resp->content;	
 
	print "content : ";
	print $content;
La réponse que j'obtiens chaque fois est
500 Can't connect to hal.archives-ouvertes.fr:80 (connect: timeout)
J'ai bien sûr vérifié que le site en question n'était pas tombé.
Que puis je essayer de faire sachant que le programme perl en question tourne sur un serveur distant dont je ne connais pas les paramétrages réseaux et firewall en particulier. Que puis je tester pour voir d'où vient le problème sachant que j'ai accès au serveur en question en ssh ?

Merci par avance de votre éventuelle aide ou piste pour avancer...