redirection console commande system()

Bonjour à tous,

Je suis nouveau sur Perl et j'aimerais savoir s'il est possible de rediriger la console d'une commande system()
dans un log plutot qu'a l'ecran. Pour logguer les infos j'utilise Log4perl. Voici mon bout de code :

Code:

---

1 2	system("sha256sum $backupdir/$databases-$timeStamp.sql.gz | tee $backupdir/$databases-$timeStamp.sql.gz.sha256sum");

---

ce que je voudrais rediriger c'est l'output de la commande dans mon fichier de log

Est ce possible ?

Merci à vous,

oui c'est possible, il existe plusieurs possibilités :
https://stackoverflow.com/questions/...a-file-in-perl

(pas tout lu) : https://www.perlmonks.org/?node_id=631760

Bonjour.


La fonction system() permet de lancer une commande et de récupérer l'état de sortie de celle-ci. (un entier en général)
Pour collecter la sortie d'une commande, il faut utiliser soit l'opérateur qx{} soit ``. Exemple:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

use Modern::Perl; use Data::Printer;   ### lancer une commande systeme:   # recup etat de sortie de la commande my @sys = system( 'ls -l' ); p @sys;   # recup la sortie de la commande avec opérateur qx{}: my @qx = qx{ls -l}; p @qx;   # recup la sortie de la commande avec opérateur ``: my @app = `ls -l`; p @app;

---

PS Si besoin les accolades de qx peuvent être remplacées par autre chose, comme tous les opérateurs q...

@Puppet_Master et @ JeanMi3000 Merci pour vos réponses j'ai reussi à faire ce que je voulais grace a vos conseils

Merci à vous 8-)