copiar arquivos baseado no padrão de caracteres

[Carlos Eduardo Rodrigues Diogenes]

Olá Pessoal,

Fiz algumas tentativas, mas sem sucesso de tentar verificar se o nome de 
arquivos em um determinado diretório contém um determinado padrão e 
depois copiá-los para outro diretório.

O que tentei fazer foi o seguinte:

for filename in *
do
   case $filename in
      *[a-z]*|""   )    ;;
      *[a-z]*.*|"")    ;;
      *                )    cp -a $filename /diretorio/destino
                             ;;
   esac
done

Porém o código acima não funciona devido a primeira expressão regular do 
case, o qual ignora qualquer string que contenha uma letra minúscula 
antes ou depois do ponto. Além disso, existe ainda outro problema, o for 
filename in * pega arquivos em subdiretórios, porém preciso apenas 
verificar os arquivos que estão no diretório local.

Os arquivos que preciso copiar devem conter o seguinte padrão, ter todas 
as letras maiúsculas ou ter todas as letras maiúsculas antes de um ponto.

Carlos.