Re: Expressions regulières //netoyage de fichiers SAMBA

[Eric DECORNOD <eric.decornod@iutlpa.u-strasbg.fr>]

Le jeudi 19 avril 2007 11:06, Cédric LE BRIS a écrit :
> Bonjour,  je cherche des connaisseurs shell:) [...]
s/shell/perl/

> rename 's/[éèêë]/e/g' "$1"
> rename 's/[ÈÉÊË]/E/g' "$1"
> rename 's/[àáâãäå]/a/g' "$1"
> rename 's/[ÀÁÂÃÄÅ]/A/g' "$1"
> rename 's/[ïîìí]/a/g' "$1"
> rename 's/[ÌÍÏÎ]/I/g' "$1"
> rename 's/[òóôõö]/o/g' "$1"
> rename 's/[ÒÓÔÕÖ]/O/g' "$1"
> rename 's/[ùúûü]/u/g' "$1"
> rename 's/[ÙÚÛÜ]/U/g' "$1"
> rename 's/[$!?µ£ %]/_/g' "$1"
> Si qq a une expression plus propre ;)
> Merci
tr/èêëÈÉÊËàáâãäåÀÁÂÃÄÅïîìíÌÍÏÎòóôõöùúûüÙÚÛÜ$!?µ£ %/eeeeEEEEaaaaaaAAAAAAiiiiIIIIooooouuuuUUUU_______/

c.f. : 
http://perldoc.perl.org/perlop.html#tr/SEARCHLIST/REPLACEMENTLIST/cds-tr-y-transliterate-/c-/d-/s

sinon mais je suis pas sur :
rename '
s/[=a=]/a/g;
s/[=A=]/A/g;
s/[=e=]/e/g;
s/[=E=]/E/g;
...
' "$1"

Cordialement,
-- 
Eric DÉCORNOD
Ingénieur d'Études
SCICS - Faculté des Sciences
Université Henri Poincaré