IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Web Perl Discussion :

LWP::UserAgent 500 Can't connect to (timeout)


Sujet :

Web Perl

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Juin 2002
    Messages
    162
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2002
    Messages : 162
    Par défaut LWP::UserAgent 500 Can't connect to (timeout)
    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...

  2. #2
    Membre expérimenté

    Profil pro
    Inscrit en
    Août 2009
    Messages
    156
    Détails du profil
    Informations personnelles :
    Âge : 43
    Localisation : France

    Informations forums :
    Inscription : Août 2009
    Messages : 156
    Par défaut
    Tu peux tenter, depuis le serveur où ton programme tourne:
    Un ping simple sur le nom du serveur à joindre
    wget $url (commande Unix/Linux en ligne de commande directment) qui va faire l'appel vers $url et afficher tout le résultat HTML.

    Tu peux aussi essayer ton script en local pour vérifier que le problème ne vient pas du script lui-même.

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Juin 2002
    Messages
    162
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2002
    Messages : 162
    Par défaut
    Effectivement j'avais bien tenté un wget sur le serveur distant qui fonctionne. par contre le ping perd 100% des paquets!!??!!
    Une idée de ce que cela signifie moi qui suis nulle en réseau??

    Sinon pour faire tourner mon script en local c'est une idée que j'ai eu mais je suis sur un poste en windows et je ne sais pas trop comment m'y prendre du coup pour exécuter un script perl... la encore je suis preneuse de vos conseils!!

    Merci!

  4. #4
    Membre expérimenté

    Profil pro
    Inscrit en
    Août 2009
    Messages
    156
    Détails du profil
    Informations personnelles :
    Âge : 43
    Localisation : France

    Informations forums :
    Inscription : Août 2009
    Messages : 156
    Par défaut
    -désolé de la réponse tardive-
    Sous Windows, tu peux utiliser ActivePerl, ça s'installe très facilement.

    ping peut ne pas passer si le paramétrage du serveur que tu ping le refuse.
    Si wget marche ça suffit comme test, ton agent devrait marcher aussi vu qu'il utilise les même ports/protocoles.

  5. #5
    Membre confirmé
    Profil pro
    Inscrit en
    Juin 2002
    Messages
    162
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2002
    Messages : 162
    Par défaut
    Merci pour le tuyau ActivePerl!!

    Il y avait une petite erreur dans mon programme effectivement que j'ai pu voir du coup facilement!!
    Je vais essayer de faire tourner le script comme il faut sur mon poste et je vais voir ensuite à partir du serveur distant ce que ça donne.

    Merci encore... je poste des nouvelles dès que j'ai avancé...

  6. #6
    Membre confirmé
    Inscrit en
    Juin 2007
    Messages
    106
    Détails du profil
    Informations forums :
    Inscription : Juin 2007
    Messages : 106
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    my $ua  = new LWP::UserAgent;
    $ua->timeout(2000);
    le timeout s'exprime en seconde.. Dans ton cas, plus de 33 minutes

    $ua->timeout( $secs ) Get/set the timeout value in seconds. The default timeout() value is 180 seconds, i.e. 3 minutes.
    The requests is aborted if no activity on the connection to the server is observed for timeout seconds. This means that the time it takes for the complete transaction and the request() method to actually return might be longer.
    Source : http://search.cpan.org/~gaas/libwww-perl-5.834/lib/LWP/UserAgent.pm

Discussions similaires

  1. [MySQL 4.1.11] Can't connect to MySQL server on...
    Par Huntress dans le forum SQL Procédural
    Réponses: 8
    Dernier message: 04/10/2005, 09h39
  2. PB : Can't connect to local MySQL server through socket
    Par nownow dans le forum Décisions SGBD
    Réponses: 2
    Dernier message: 30/05/2005, 09h35
  3. ERROR 2003: Can't connect to MySQL server on 'localhost'...
    Par tonton54 dans le forum Installation
    Réponses: 8
    Dernier message: 25/04/2004, 16h51
  4. Mysql ERROR 2002: Can't connect to local MySQL
    Par Michel dans le forum Réseau
    Réponses: 2
    Dernier message: 17/01/2004, 18h35
  5. [Connexion MySQL] Can't connect to MySQL server
    Par mat_dum dans le forum Outils
    Réponses: 12
    Dernier message: 17/07/2003, 07h49

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo