Organizar documentos por letra [RESOLVIDO]

allendohorizonte
(usa Slackware)

Enviado em 19/01/2011 - 11:33h

Amigos, eu preciso organizar meus documentosos em subdiretorios, um para cada letra do alfabeto
(documentos q começam com a letra A no subdiretorio A; ... ; documentos q começam com a letra Z no subdiretorio Z)
Como posso diminuir essa serie de comandos "procura em; copia para" abaixo para uma expressão menor?
Desde já Agradeço

find . -name "a*" -exec cp {} ./a \;
find . -name "b*" -exec cp {} ./b \;
find . -name "c*" -exec cp {} ./c \;
find . -name "d*" -exec cp {} ./d \;
find . -name "e*" -exec cp {} ./e \;
find . -name "f*" -exec cp {} ./f \;
find . -name "g*" -exec cp {} ./g \;
find . -name "h*" -exec cp {} ./h \;
find . -name "i*" -exec cp {} ./i \;
find . -name "j*" -exec cp {} ./j \;
find . -name "k*" -exec cp {} ./k \;
find . -name "l*" -exec cp {} ./l \;
find . -name "m*" -exec cp {} ./m \;
find . -name "n*" -exec cp {} ./n \;
find . -name "o*" -exec cp {} ./o \;
find . -name "p*" -exec cp {} ./p \;
find . -name "q*" -exec cp {} ./q \;
find . -name "r*" -exec cp {} ./r \;
find . -name "s*" -exec cp {} ./s \;
find . -name "t*" -exec cp {} ./t \;
find . -name "u*" -exec cp {} ./u \;
find . -name "v*" -exec cp {} ./v \;
find . -name "w*" -exec cp {} ./w \;
find . -name "x*" -exec cp {} ./x \;
find . -name "y*" -exec cp {} ./y \;
find . -name "z*" -exec cp {} ./z \;