Ce script n'est qu'un ex qui contient d'ailleurs des erreurs.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
use strict;
system "notepad";
system "notepad";
system "dir c:\ *.* > dir.txt";
exec "notepad dir.txt";
system "notepad";
Je sais que la commande system attend la fin de la commande pour executer la suite du script.
La commande exec me sort du script dès qu'elle est exécutée.

Y a-t-il un autre moyen d'exécuter des commandes systems sans avoir besoin d'attendre la fin de l'une pour passer à la suivante?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
system "dir c:\ *.* > dir.txt";
Là j'ai un problème avec le path
Et un problème pour afficher la taille restante libre.
Voilà le résultat:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 R‚pertoire de C:\Perl\script
 
23/01/2006  01:19    <REP>          .
23/01/2006  01:19    <REP>          ..
23/01/2006  10:59                73 exec.pl
23/01/2006  11:04                 0 dir.txt
               4 fichier(s)              146 octets
               4 R‚p(s)  11ÿ313ÿ020ÿ928 octets libres