il ne manquerait pas qq espaces?
Code :
- make_txt()
- {
- rm -f $rep/*.txt
- for i in `ls $rep/*.trc`do
- file=`echo $i | awk -F. '{print $1}'
- tkprof $file.trc $file.txt sys=no
- done
- }
|
Bah c'est pas très compliqué :
je vire tous les fichiers txt de $rep
ensuite, pour chaque fichier trc :
- je récupère le nom de fichier sans l'extension trc dans la variable $i (tous de qui se trouve entre le début et le 1er "." )
- ensuite j'appelle la commande tkprof avec le nom de fichier précédemment calculé
Truc bizarre, pour pour il manque des $rep pour la command tkprof...
Sinon pour le portage en perl,
- la fonction glob est ton ami
- foreach aussi
- les regexp aussi
- system aussi...
Bon courage...