Discussion :

[Mr6]

Slt tlm !

La question a déjà dûe être posée mais comme je n'arrive pas à vraiment trouver mon bonheur, je pose la mienne :
Je veux faire un script perl qui, à un moment donné, me fait ca :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
system("mv $fic_src $fic");
exit $?;

Je veux que mon script, me crache le code erreur, mais pas les insultes, cad que lorsque par exemple je n'ai ni $fic_src ni $fic présent il doit pouvoir me donne le code mais pas le

mv : 0653-401 Impossible de renommer /tmp/test1 par /tmp/test2 :
Un fichier ou un répertoire du chemin d'accès n'existe pas.

pour le moment, le meilleur résultat obtenu est en faisant ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
open MV, "mv $fic_src $fic |";
close (MV);
print $?;

mettre un die aurait pu être sympa si je n'avais pas le "at ./file ligne 8...", et bien sûr mon script fait un exit 0 si je le laisse avec un print...
Merci de m'aider

@+
Mr6

[Mr6]

je viens de voir que eval m'aiderait à résoudre mes soucis (ainsi que rename d'ailleurs...). qqun pourrait me montrer comment m'en servir à la rigueur (bah oui, j'ai jamais eu à utiliser cette fonction...)

[GLDavid]

Salut

Si tu appelles des commandes shell sous Unix, je te conseille cette structure :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
#!/usr/bin/perl -w
 
use strict;
 
my $retour = system("mv toto.txt tata.txt >> /dev/null 2>&1");
print $retour;
exit $retour;

L'avantage, c'est que tous les messages du shell (stdout et stderr) seront redirigés vers /dev/null.
Entre parenthèses, il est possible de faire un mv en Perl pûr avec la commande rename.

@++

[Mr6]

vi, j'avais apercu le rename.
Le soucis là, c'est qu'une fois le script exécuté, si je fais un echo $? dans le shell, j'ai 0, et non 256 par exemple si mes fichiers n'existent pas...

[GLDavid]

Je te recommande aussi cette lecture : http://perl.developpez.com/faq/?page...nC2#sectionC21
Mais typiquement, c'est plus un problème de redirection stdout/stderr que tu avais. Avec mon écriture, ça devrait aller mieux.

@++

[Mr6]

Merci ! en fait, après relecture, c'est le exec qui me correspond le mieux car il s'agit de la dernière commande de mon script

[GLDavid]

Oki. Si c'est bon, n'oublies pas le tag Résolu.

@++