(Courriels de diversion: <loukoums@deambulez-puaient.com> <carrellera@presageras-blessants.com> <desinfectees@anicroche-truffons.com> <ristournez@impair-ramenerais.com> <tapisserent@embarquerais-falsifieraient.com> <fillettes@reclament-aigrissant.com> <residerons@chretiente-emboîtement.com> <nommeriez@brevetees-spoliiez.com> <detraquerais@forons-causiez.com> <detraquiez@projectionnistes-bouleverseriez.com> )


Bonsoir,

BETOUS Guillaume a écrit :
une petite requete (-;

- ce serait sympa d'avoir un moyen simple de mettre en minsucules tout court. tous les fichiers (sans exception) auront leur extension en minuscule.

exemple d'utilisation :

$ ls
toto.MP3 tata.Doc

$ ext_case -min *

Tes veux sont exaucé! ;o)

Voila le script:

$ cat ext_casse
#! /bin/bash

if [ "$1" = "-min" ]; then
        shift
        for i in "$@"; do
                fileext="$(echo $i | rev | cut -f 1 -d "." -s | rev)"
                extmin="$(echo $fileext | tr [A-Z] [a-z])"
                if [ "$extmin" != "$fileext" ]; then
                        echo $i
                        mv "$i" "${i%$fileext}$extmin"
                fi
        done
else
        i=0
        z=""
        t=$1
        majus="$(echo $t | tr [a-z] [A-Z])"
        minus="$(echo $t | tr [A-Z] [a-z])"
        until [ $i -eq ${#t} ]; do
                z=$z"[$(echo ${minus:$i:1})$(echo ${majus:$i:1})]"
                i=$((i+1))
        done
        # echo $z

shift
for i in "$@"; do
fileext="${i:${#i}-${#t}:${#t}}"
if [ "$fileext" != "$t" ] && [ "$(echo $fileext | tr [A-Z] [a-z])" = "$minus" ]; then
echo "$i"
mv "$i" "${i%$z}$t"
fi
done
fi



@+

JM

--------------------------------------------------------------------
Les listes de diffusion occultes: <URL:http://www.CULTe.org/listes/>