shell-script-pt
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RES: [shell-script] Caracteres acentuados


From: Julio Cezar Neves - DATAPREVRJ
Subject: RES: [shell-script] Caracteres acentuados
Date: Mon, 13 Sep 2004 17:00:19 -0300

#!/bin/bash

if [ "$#" != 2 ]
then
   echo ""
   echo "Use: $0 <dir> <extensao>"
   echo "Exemplo: $0 /musicas mp3
"
   exit 1
fi

DIR="$1"
EXT="$2"
echo ""
echo "-------------------------------------------------"
echo "Renomeando arquivos do diretório $DIR ..."
echo ""
CONT=0
for ARQ in *.$EXT
do
        NOVO=$(tr 'A-ZÁÄÀÃÉËÈÍÓÖÕÜÚ |+=)(*&^%#@'
'a-zaaaaeeeiooouu____________' <$ARQ)
        if [ "$NOVO" != "$ARQ" ]
        then
                echo "$ARQ -> $NOVO"
                mv -f "$ARQ" "$NOVO"
                CONT=$(expr $CONT + 1)
        fi
done

echo "
 Trabalho feito! $CONT arquivo(s) renomeado(s).
 -------------------------------------------------"

[ ]s,
Julio Cezar Neves
- Gerente do Programa de Software Livre -
Tel:+55 21 2528-7070 / +55 21 8112-9988
Fax: +55 21 2528-7646
mailto:address@hidden


| -----Mensagem original-----
| De: laerte [mailto:address@hidden]
| Enviada em: segunda-feira, 13 de setembro de 2004 13:50
| Para: address@hidden
| Assunto: [shell-script] Caracteres acentuados
| 
| 
| -----BEGIN PGP SIGNED MESSAGE-----
| Hash: SHA1
| 
| pessoal;
| 
| 
| Estou com um problema. Tenho um diretorio com arquivos 
| windows acentuados, 
| gostaria de trocar todas as letras acentuadas por nao 
| acentuadas. como faço 
| isso. peguei alguns scripts na net e tentei fazer uma adaptação;
| 
| 
| #!/bin/bash
| 
| if [ "$#" != 2 ]
| then
|    echo ""
|    echo "Use: $0 <dir> <extensao>"
|    echo "Exemplo: $0 /musicas mp3"
|    echo ""
|    exit
| fi
| 
| DIR="$1"
| EXT="$2"
| echo ""
| echo "-------------------------------------------------"
| echo "Renomeando arquivos do diretório $DIR ..."
| echo ""
| CONT=0
| ls *.${EXT} | while read ARQ
| do
|         NOVO=$(echo $ARQ | tr 
| 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzÁÄÀÃÉËÈÍÓ
| ÖÕÜÚ |+=)
| (*&^%#@"'  
| 'abcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzaaaaeeeio
| oouu____________"'`)
|         if [ "$NOVO" != "$ARQ" ]
|         then
|                 echo "$ARQ -> $NOVO"
|                 mv "$ARQ" "$NOVO"
|                 CONT=$(expr $CONT + 1)
|         fi
| done
| 
| echo ""
| echo " Trabalho feito! $CONT arquivo(s) renomeado(s)."
| echo "-------------------------------------------------"
| -----BEGIN PGP SIGNATURE-----
| Version: GnuPG v1.2.4 (GNU/Linux)
| 
| iD8DBQFBRc+qdIM2xkUM7xkRAokzAKDDQCHJ4O5pFb+8ASfjSw6YOBjabwCcCcvd
| UD69flaa/srd9yMNv1D3qc4=
| =l2/p
| -----END PGP SIGNATURE-----
| 
| 
| ---------------------------------------------------------------------
| Esta lista não admite a abordagem de outras liguagens de 
| programação, como perl, C etc. Quem insistir em não seguir 
| esta regra será moderado sem prévio aviso.
| ---------------------------------------------------------------------
| Sair da lista: address@hidden
| ---------------------------------------------------------------------
| Esta lista é moderada de acordo com o previsto em 
http://www.listas-discussao.cjb.net
---------------------------------------------------------------------
 
Links do Yahoo! Grupos




 
 


reply via email to

[Prev in Thread] Current Thread [Next in Thread]