Crie pastas com nomes exclusivos de nomes de arquivos

Crie pastas com nomes exclusivos de nomes de arquivos

Estou tentando criar pastas a partir de nomes de arquivos exclusivos. Aqui estão os arquivos:

T001
└── 20000101
    ├── 6_3D-MP-RAGE_97.dcm
    ├── 6_3D-MP-RAGE_98.dcm
    ├── 5_133_VOLUMES_99027.dcm
    ├── 5_133_VOLUMES_99028.dcm
    ├── 5_133_VOLUMES_99029.dcm
    ├── 5_133_VOLUMES_99030.dcm
    ├── 4_COR_3D_T1_MPR_1.dcm
    ├── 4_COR_3D_T1_MPR_107.dcm

Quero que a magia do bash resulte nisso:

T001
└── 20000101
    ├── 6_3D
        ├── 6_3D-MP-RAGE_97.dcm
        ├── 6_3D-MP-RAGE_98.dcm
    ├── 5_133
        ├── 5_133_VOLUMES_99027.dcm
        ├── 5_133_VOLUMES_99028.dcm
        ├── 5_133_VOLUMES_99029.dcm
        ├── 5_133_VOLUMES_99030.dcm
    ├── 4_COR
        ├── 4_COR_3D_T1_MPR_1.dcm 
        ├── 4_COR_3D_T1_MPR_107.dcm

E tentei este código para extrair nomes de pastas, mas não consegui:

all_patterns=()
for file in sorted/folder/*/*
do
    name=${file##*/}
    pattern=`echo ${name} | cut -f1 -d '_'`
    all_patterns+=( "$pattern" )
done

Responder1

Você pode tentar este código para gerar os nomes dos diretórios e criar esses diretórios:

cd  T001/20000101
for i in *
do
dname=$(echo $i|awk -F'[-_]' '{print $1_$2}')
mkdir -p $dname
mv "$i" $dname
done

informação relacionada