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 :

redirection de la sortie standard


Sujet :

Langage Perl

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    Mars 2006
    Messages
    111
    Détails du profil
    Informations personnelles :
    Localisation : Suisse

    Informations forums :
    Inscription : Mars 2006
    Messages : 111
    Points : 44
    Points
    44
    Par défaut redirection de la sortie standard
    Salut a tous,

    J'ai une question a moitié générale, a moitié cgi. Je me trouve dans le cadre d'un script cgi et j'aimerais redirigé ce qui apparait à l'écrant pour l'écrire dans un fichier. Du coup, je fais :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    print header(); open STDOUT,">", 'temp' || die "cannot open file : $!"; 
    print ... (suite du programme)
    mais ca n'écrit rien dans le fichier et pas d'erreur... une idée ?

  2. #2
    Rédacteur/Modérateur

    Avatar de Antoun
    Homme Profil pro
    Architecte décisionnel
    Inscrit en
    Octobre 2006
    Messages
    6 281
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 53
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Architecte décisionnel
    Secteur : Conseil

    Informations forums :
    Inscription : Octobre 2006
    Messages : 6 281
    Points : 11 737
    Points
    11 737
    Par défaut
    au moins à titre de test, je te conseille de désactiver le buffer de sortie :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    $| = 1 ; # OUTPUT_AUTOFLUSH : pas de buffer sur STDOUT
    Antoun
    Expert Essbase, BO, SQL

    La bible d'Essbase, 2ème édition

  3. #3
    Expert éminent
    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
    Points : 8 586
    Points
    8 586
    Par défaut
    Citation Envoyé par mauroyb0

    mais ca n'écrit rien dans le fichier et pas d'erreur... une idée ?
    Et sur l'écran ?
    Et sans ta tentative de redirection ?

    --
    Jedaï

  4. #4
    Membre du Club
    Profil pro
    Inscrit en
    Mars 2006
    Messages
    111
    Détails du profil
    Informations personnelles :
    Localisation : Suisse

    Informations forums :
    Inscription : Mars 2006
    Messages : 111
    Points : 44
    Points
    44
    Par défaut
    Alors dans l'ordre : bufer ne chenage rien, à l'écran si je ne redirige pas, il y qqch mais avec il n'y a rien...

  5. #5
    HRS
    HRS est déconnecté
    Membre confirmé
    Avatar de HRS
    Inscrit en
    Mars 2002
    Messages
    677
    Détails du profil
    Informations forums :
    Inscription : Mars 2002
    Messages : 677
    Points : 638
    Points
    638
    Par défaut
    je pense que le script doit commencer par

    open (STDOUT, ">fichierresu");
    open (STDERR, ">&STDOUT");

  6. #6
    Membre du Club
    Profil pro
    Inscrit en
    Mars 2006
    Messages
    111
    Détails du profil
    Informations personnelles :
    Localisation : Suisse

    Informations forums :
    Inscription : Mars 2006
    Messages : 111
    Points : 44
    Points
    44
    Par défaut
    Ok,

    je viens de comprendre un peu pourquoi. Dans mon script j'en appelle d'autre dont la sortie standard ne doit pas etre redirigée. Du coup maintenant je cherche un moyen de

    1) rétablir la sortie standard
    2) si possible localement à un if ou une fonction par exemple...

    Merci a tous en tout cas, ca avance peu a peu...

  7. #7
    Membre chevronné
    Avatar de Woufeil
    Profil pro
    Étudiant
    Inscrit en
    Février 2006
    Messages
    1 076
    Détails du profil
    Informations personnelles :
    Âge : 36
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Février 2006
    Messages : 1 076
    Points : 2 004
    Points
    2 004
    Par défaut
    Bonjour,

    Pour conserver ton écran, il te faut le dupliquer. En C, ça reviendrait à appeler dup. En Perl, la fonction open permet de le faire comme ceci :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    open (SAUVE_ECRAN,">&STDOUT");
    Dans ce code, le handle SAUVE_ECRAN contiendra une copie de STDOUT.
    Plus d'infos là dessus sur la doc Perl.
    Notemment cette partie :
    Citation Envoyé par La doc Perl
    Vous pouvez aussi, dans la tradition du Bourne shell, spécifier une expression EXPR commençant par '>&' auquel cas le reste de la chaîne sera interprété comme le nom d'un descripteur (ou son numéro si c'est une valeur numérique) à dupliquer puis à ouvrir. Vous pouvez utiliser & après >, >>, <, +>, +>> et +<. Le mode que vous spécifiez devrait correspondre à celui du descripteur original. (La duplication d'un descripteur ne prend pas en compte l'éventuel contenu des tampons d'entrées/sorties). Si vous utilisez l'appel avec 3 arguments alors vous devez fournir soit un nombre, soit le nom du descripteur soit une référence globale ``normale''.
    Le fait est que ce code devrait t'intéresser :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    open (SAUVE_ECRAN,">&STDOUT"); #on sauve l'écran dans SAUVE_ECRAN
    open (STDOUT, ">test.txt"); #on écrase STDOUT
    print "Test";
    close STDOUT;
    open (STDOUT, ">&SAUVE_ECRAN"); #on "régénère" STDOUT
    close SAUVE_ECRAN;
    print "Test";
    Pour le faire localement à un if... Euh, bah utilise un process à part pour faire ça
    "En essayant continuellement, on finit par réussir. Donc : plus ça rate, plus on a de chances que ça marche" (devise Shadock)
    Application :

    ainsi qu'à regarder la avant de poser une question.

    La rubrique Perl recrute, contactez-moi.

Discussions similaires

  1. Redirection de la sortie standard d'une console
    Par LsMarx dans le forum C++/CLI
    Réponses: 5
    Dernier message: 25/07/2012, 14h33
  2. Redirection de la sortie standard
    Par Dud225 dans le forum C
    Réponses: 12
    Dernier message: 11/04/2007, 23h56
  3. Redirection de la sortie standard
    Par ankou82 dans le forum SDL
    Réponses: 20
    Dernier message: 29/05/2006, 13h54
  4. [Débutant(e)] Redirection de la sortie standard
    Par salber dans le forum Entrée/Sortie
    Réponses: 3
    Dernier message: 17/06/2005, 15h34
  5. redirection de la sortie standard
    Par sorari dans le forum C++
    Réponses: 8
    Dernier message: 19/05/2005, 11h47

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