Question

我有一堆（超过700个）以下列方式命名的目录

1 - *random*name*1*
2 - *random*name*2*
...
725 - *random*name*725*

前导号码（1-725）都是目录名称的一部分。

即：所有目录名称都以数字开头，后跟[空格] [破折号] [空格]，后跟一些文字。

我想批量重命名它们，以便将它们命名为：

1 - *random*name*725*
2 - *random*name*724*
...
725 - *random*name*1*

我想“反转”目录名的数字部分。基本上我喜欢“1 - ”之后的文字跟随“725 - ”，“2 - ”之后的文字跟随“724 - ”等等。

最简单的方法是什么？我在linux上。

注意： *随机*名称*都不同，仅供说明之用。

Answer 1

使用perl的一种方法。代码已评论。

script.pl的内容：

#!/usr/bin/env perl

use warnings;
use strict;
use File::Basename qw|basename|;

die qq{Usage: perl $0 <real|trial>\n} unless @ARGV == 1;

my $real = $ARGV[0] eq q|real| ? 1 : 0;

## Filter filenames from the directory that match criteria of OP.
my @files = grep { -d $_ && m/\A(\d+)\s-\s.*\1/ } map { basename $_ } <./*>;

## Get numbers in reverse mode to substitute them later in filenames .
my @nums = map { m/\A(\d+)/; $1 || 0 } reverse @files;

## Process all files, change the number of the file and rename it.
for my $file ( @files ) { 
    (my $new_file = $file) =~ s/\A(\d+)/shift @nums/e;

    if ( $real ) { 
        rename $file, $new_file or warn qq|WARN: Couldn't rename "$file"\n|;
    }   
    else {
        printf qq|%s\n|, qq|rename "$file" "$new_file"|;
    }   
}

列出目录：

ls -1

使用以下输出：

1 - file1file
2 - fi2le
3 - fileeee3
4 - fou4r
5 -  donttouch
6 -  donttouch5either
script.pl

运行脚本：

perl script.pl

再次列出指南：

ls -1

使用以下输出：

1 - fou4r
2 - fileeee3
3 - fi2le
4 - file1file
5 -  donttouch
6 -  donttouch5either
script.pl

编辑：评论中有一条建议让试用版在真实版之前运行，因此我添加了参数real或trial。使用第一个选项将执行实际更改，而使用第二个选项将print输出实际命令但不运行它们。现在运行如下脚本：

perl script.pl real

或

perl script.pl trial

Answer 2

让我们先模拟一些文件名：

$ printf 'kjdfh8\nskdjfh9\nckjhv10\naskjdh11\n'
kjdfh8
skdjfh9
ckjhv10
askjdh11

然后通过管道运行：

$ printf 'kjdfh8\nskdjfh9\nckjhv10\naskjdh11\n' | sed 's/[^0-9]*\(.*\)/\1 &/' | sort -nr | cut -d\  -f2-
askjdh11
ckjhv10
skdjfh9
kjdfh8

这是如何工作的？这其实很简单。首先，我们使用sed在行的开头放置任何数字内容的副本。接下来，我们排序。最后，我们使用cut去掉行开头的数字。瞧！

现在......那只是颠倒了顺序。这是你问题中的一个问题，但你的最终目标是重命名。我们可以使用另一个也是while循环的管道来扩展上面的列表。这次我会把事情做好，以便于阅读。

#!/bin/bash

n=0
printf 'kjdfh8\nskdjfh9\nckjhv10\naskjdh11\n' \
| sed 's/[^0-9]*\(.*\)/\1 &/' | sort -nr | cut -d\  -f2- \
| while read file; do
    base="${file/[0-9]*/}"
    ((n++))
    printf 'mv "%s" "%s%s"\n' "$file" "$base" "$n"
  done

这个while循环读入我们上面创建的文件列表。它通过从第一个数字开始删除文件名中的所有内容来获取“基础”。它递增一个计数器（用于新名称），然后打印一个带有旧文件名，基数和计数器的mv命令。

同样，此脚本的输出是一组mv命令，您可以通过它来管道。

显然，要在文件上使用它，您需要将初始printf命令替换为生成文件列表的命令。

注意：以这种方式处理文件名通常是不可取的，因为文件名出现意外或特殊字符（甚至空格）的风险会导致计划丢失。只有你确信自己理解它才能做到这一点。

Answer 3

如果这个awk解决方案对你好吗？

CMD：

ls -F|grep "/$"|sort|awk 'BEGIN{FS=" - ";l=5;}{o=$0;gsub("/$","",o);gsub($1"/$",l--);if(o!=$0)printf "mv \"%s\" \"%s\"\n",o,$0 }' |sh

这里5是硬编码的，在你的情况下是725. :)当然它可以由wc -l设置，但我是abit懒惰。

试验：

kent$  tree -d
.
|-- 1 - foo1
|-- 2 - foo2
|-- 3 - foo3
|-- 4 - foo4
`-- 5 - foo5

5 directories

#this will only print the generated mv command:

kent$  ls -F|grep "/$"|sort|awk 'BEGIN{FS=" - ";l=5;}{o=$0;gsub("/$","",o);gsub($1"/$",l--);if(o!=$0)printf "mv \"%s\" \"%s\"\n",o,$0 }'   
mv "1 - foo1" "1 - foo5"
mv "2 - foo2" "2 - foo4"
mv "4 - foo4" "4 - foo2"
mv "5 - foo5" "5 - foo1"

# if you pipe the generated command to "sh", they will be executed:

kent$  ls -F|grep "/$"|sort|awk 'BEGIN{FS=" - ";l=5;}{o=$0;gsub("/$","",o);gsub($1"/$",l--);if(o!=$0)printf "mv \"%s\" \"%s\"\n",o,$0 }' |sh


#result:

kent$  tree -d
.
|-- 1 - foo5
|-- 2 - foo4
|-- 3 - foo3
|-- 4 - foo2
`-- 5 - foo1

5 directories

Answer 4

此：

find /path/to/the/directories/location/ -depth -exec mv '{}' $(basename '{}')$(echo $(date "+%H%M%S%N")) \;

批量重命名目录的顺序相反

4 个答案: