Script perl pour renommer des fichiers

Fermé
machin - 13 juin 2009 à 12:29
 Le manu - 30 juin 2009 à 20:58
Bonjour,
je voudrais savoir comment est il possible de renommer une liste de fichiers contenue dans un répertoire unix.
ex: j'ai un repertoire qui se nomme rbFT et qui contient FT_001_A.doc .... jusqu'à FT_804_A.doc en FT_001.doc...FT_804.doc.
j'aimerai taper cela en un simple script pour qu'il puisse faire ce travail en l'executant sous perl si possible.
Un grand merci d'avance.
A voir également:

3 réponses

jipicy Messages postés 40842 Date d'inscription jeudi 28 août 2003 Statut Modérateur Dernière intervention 10 août 2020 4 897
14 juin 2009 à 14:13
Salut,

Une solution en shell "bash" :
[tmpfs]$ ls -1
FT_001_A.doc
FT_002_A.doc
FT_003_A.doc
FT_004_A.doc
FT_005_A.doc
FT_006_A.doc
FT_007_A.doc
FT_008_A.doc
FT_009_A.doc
[tmpfs]$ for fic in *;do mv ${fic} ${fic/_A/};done
[tmpfs]$ ls -1
FT_001.doc
FT_002.doc
FT_003.doc
FT_004.doc
FT_005.doc
FT_006.doc
FT_007.doc
FT_008.doc
FT_009.doc
[tmpfs]$
;-))
1
x11r6 Messages postés 353 Date d'inscription jeudi 13 mars 2008 Statut Membre Dernière intervention 7 mars 2017 59
13 juin 2009 à 16:37
http://tips.webdesign10.com/how-to-bulk-rename-files-in-linux-in-the-terminal

c'est là :)
0
merci pour le lien mais ce n'est pas ce que j'attendais.
j'aimerai avoir le script entier.
"rename" ne fonctionne pas.
j'ai fait un truc comme
#!usr/bin/perl -w

user strict;

which (<>)
{
s/_A/" ";
}

ensuite sur mon invite de commande je tape le nom de mon script mais je ne peux l'appliquer pour le dossier contenant la fameuse liste de fichiers, donc je suis bloquer pour renommer ces fichiers.
merci pour l'aide.
0
Bonjour,
Pour des infos completes sur les fichiers et perl :
http://perl.developpez.com/sources/?page=section1
0