大多数其他解决方案将覆盖已命名为数字的现有文件。如果运行脚本，添加更多文件，然后再次运行脚本，这尤其是个问题。

这个脚本首先重命名现有的数字文件:

#!/usr/bin/perl

use strict;
use warnings;

use File::Temp qw/tempfile/;

my $dir = $ARGV[0]
    or die "Please specify directory as first argument";

opendir(my $dh, $dir) or die "can't opendir $dir: $!";

# First rename any files that are already numeric
while (my @files = grep { /^[0-9]+(\..*)?$/ } readdir($dh))
{
    for my $old (@files) {
        my $ext = $old =~ /(\.[^.]+)$/ ? $1 : '';
        my ($fh, $new) = tempfile(DIR => $dir, SUFFIX => $ext);
        close $fh;
        rename "$dir/$old", $new;
    }
}

rewinddir $dh;
my $i;
while (my $file = readdir($dh))
{
    next if $file =~ /\A\.\.?\z/;
    my $ext = $file =~ /(\.[^.]+)$/ ? $1 : '';
    rename "$dir/$file", sprintf("%s/%04d%s", $dir, ++$i, $ext); 
}

为了在所有情况下都能工作，在名称中有空格的文件中加上“\”

find . -name '*.jpg' | gawk 'BEGIN{ a=1 }{ printf "mv \"%s\" %04d.jpg\n", $0, a++ }' | bash

这个脚本将在Mac OS bash上按创建日期对文件进行排序。我用它来重命名视频。只需更改扩展名和名称的第一部分。

ls -trU *.mp4| awk 'BEGIN{ a=0 }{ printf "mv %s lecture_%03d.mp4\n", $0, a++ }' | bash

我也遇到过类似的问题，并为此编写了一个shell脚本。尽管已经有很多好的答案，我还是决定把它贴出来，因为我觉得它对别人有帮助。请随意改进它!

数

@Gnutt你想要的行为可以通过输入以下内容来实现:

./numerate.sh -d <path to directory> -o modtime -L 4 -b <startnumber> -r

如果-r选项被省略，扩孔将只模拟(应该有助于测试)。

动作L描述目标数字的长度(将用前导零填充) 也可以使用选项添加前缀/后缀-p <prefix> -s <suffix>。

如果有人想在文件编号之前按数字排序，只需删除-o modtime选项。

将所有文件重命名为序列和小写扩展名:

rename --counter-format 000001 --lower-case --keep-extension --expr='$_ = "$N" if @EXT' *

再次使用Pero的解决方案，只做了很少的修改，因为find将遍历目录树中的项目存储在目录条目中的顺序。在同一台机器上，这将(大部分)在不同的运行中保持一致，如果没有删除，则基本上是“文件/目录创建顺序”。

然而，在某些情况下，您需要获得某种逻辑顺序，例如按名称，这在本例中使用。

find -name '*.jpg' | sort -n | # find jpegs
gawk 'BEGIN{ a=1 }{ printf "mv %s %04d.jpg\n", $0, a++ }' | # build mv command
bash # run that command