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

Langage Perl Discussion :

pb fonction open...


Sujet :

Langage Perl

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de renaudjuif
    Inscrit en
    Avril 2006
    Messages
    325
    Détails du profil
    Informations forums :
    Inscription : Avril 2006
    Messages : 325
    Par défaut pb fonction open...
    Bonjour,

    j'essaie de contourner un pb sur un serveur en safe_mode pour php
    la fonction exec() de php est désactivée.
    j'ai remplacé mon script php par un script perl avec un open du genre:
    open(INFO, $path_bin . " " . $parm . "|");
    où $path_bin est le chemin du fichier ("/home/...")
    et $parm est les paramètres à passer au fichier exécutable.
    le fichier s'ouvre bien sans les paramètres, mais ça plante si je passe les params...
    Le fichier à ouvrir est un exécutable qui marche bien et accepte bien sur les paramètres...

    Je ne connais pas bien perl, donc je ne sais pas pourquoi ça plante..

    Merci de votre aide.

  2. #2
    Expert confirmé
    Avatar de Jedai
    Homme Profil pro
    Enseignant
    Inscrit en
    Avril 2003
    Messages
    6 245
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Côte d'Or (Bourgogne)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Avril 2003
    Messages : 6 245
    Par défaut
    Pourquoi ne pas se contenter de faire un simple :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    my $output = `$path_bin $parm`;
    Faire un pipe comme tu l'as fait a assez peu d'intérêt sauf dans des cas très particulier.

    --
    Jedaï

  3. #3
    Membre éclairé Avatar de renaudjuif
    Inscrit en
    Avril 2006
    Messages
    325
    Détails du profil
    Informations forums :
    Inscription : Avril 2006
    Messages : 325
    Par défaut aïe...
    Merci pour ta réponse,

    Problème: je ne récupère rien dans mon $output...

    Le morceau de code original est:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
     
    open(INFO, $path_bin . " " . $parm . "|");
    for ($result = 0, $i = 0; <INFO>; $i++)
    {
    $result = $result . $_;
    }
    close(INFO);
     
    @tableau = split("!",$result);
    $code = $tableau[1];
    $error = $tableau[2];
    $message = $tableau[3];
    donc je devrais récupérer une chaine sous la forme: !code!error!buffer!

    Ce code peut-il être remplacé par : my $output = `$path_bin $parm`; ?
    Si oui, ca pourrait alors être un pb au niveau de l'exécutable...

  4. #4
    Membre expérimenté
    Avatar de GLDavid
    Homme Profil pro
    Head of Service Delivery
    Inscrit en
    Janvier 2003
    Messages
    2 895
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Head of Service Delivery
    Secteur : Industrie Pharmaceutique

    Informations forums :
    Inscription : Janvier 2003
    Messages : 2 895
    Par défaut
    Bienvenue à toi renaudjuif.

    Peux-tu ajouter les balises codes ?
    Cela fait partie des règles de notre beau nouveau forum.

    @++
    GLDavid
    Consultez la FAQ Perl ainsi que mes cours de Perl.
    N'oubliez pas les balises code :tagcode: ni le tag :resolu:

    Je ne répond à aucune question technique par MP.

  5. #5
    Membre expérimenté
    Profil pro
    Inscrit en
    Décembre 2005
    Messages
    172
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2005
    Messages : 172
    Par défaut
    Salut,

    open(INFO, $path_bin . " " . $parm . "|");
    Pourquoi tu concatènes | avec tout? Tu as essayé?
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    open(INFO, $path_bin . " " . $parm |);
    ou
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    open(INFO, "$path_bin$parm |");
    lami20j

  6. #6
    Expert confirmé
    Avatar de Jedai
    Homme Profil pro
    Enseignant
    Inscrit en
    Avril 2003
    Messages
    6 245
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Côte d'Or (Bourgogne)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Avril 2003
    Messages : 6 245
    Par défaut
    A priori, avec le code que je t'ai donné, tu devrais récupérer la sortie standard dans $output. Fais un print de cette valeur. Si elle ne contient rien, il y a définitivement un problème avec l'exécutable.
    Eventuellement essaie aussi avec :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
     my $output = `$path_bin $parm 2>&1`;
    --
    Jedaï

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [BO XIR2][VB.NET] Fonction Open Document
    Par ecayuno dans le forum SDK
    Réponses: 11
    Dernier message: 18/04/2008, 17h27
  2. [AJAX] Recherche : Fonction open source pour l'encodage des accents ?
    Par polothentik dans le forum Général JavaScript
    Réponses: 3
    Dernier message: 09/04/2008, 11h09
  3. Retour fonction open
    Par viscere dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 06/08/2007, 16h09
  4. Fonction Open Recordset
    Par delcroixf dans le forum Access
    Réponses: 4
    Dernier message: 12/01/2007, 13h46
  5. [VBA/Excel] Fonction open sous Excel 97
    Par nico01984 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 04/01/2006, 14h19

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