我想将目录中的文件重命名为顺序数字。根据文件的创建日期。
例如，sadf.jpg到0001.jpg, wrjr3.jpg到0002.jpg等等，前导零的数量取决于文件的总数(如果不需要，不需要额外的零)。
当前回答
与创建日期无关，但根据已排序的名称编号:
python3 -c \
'ext="jpg"
start_num=0
pad=4
import os,glob
files=glob.glob(f"*.{ext}")
files.sort()
renames=list(zip(files,range(start_num,len(files)+start_num)))
for r in renames:
oname=r[0]
nname=f"{r[1]:0{pad}}.{ext}"
print(oname,"->",nname)
os.rename(oname,nname)
'
其他回答
与创建日期无关，但根据已排序的名称编号:
python3 -c \
'ext="jpg"
start_num=0
pad=4
import os,glob
files=glob.glob(f"*.{ext}")
files.sort()
renames=list(zip(files,range(start_num,len(files)+start_num)))
for r in renames:
oname=r[0]
nname=f"{r[1]:0{pad}}.{ext}"
print(oname,"->",nname)
os.rename(oname,nname)
'
大多数其他解决方案将覆盖已命名为数字的现有文件。如果运行脚本，添加更多文件，然后再次运行脚本，这尤其是个问题。
这个脚本首先重命名现有的数字文件:
#!/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);
}
尝试使用loop, let和printf填充:
a=1
for i in *.jpg; do
new=$(printf "%04d.jpg" "$a") #04 pad to length of 4
mv -i -- "$i" "$new"
let a=a+1
done
使用-i标志可以防止自动覆盖现有文件，而使用——可以防止mv将带破折号的文件名解释为选项。
我喜欢gauteh的解决方案，因为它简单，但它有一个重要的缺点。当在数千个文件上运行时，您可能会得到“参数列表太长”的消息(更多关于此的信息)，其次，脚本可能会变得非常慢。在我的例子中，在大约36.000个文件上运行它，脚本移动了大约。每秒一件!我不太确定为什么会发生这种情况，但我从同事那里得到的规则是“找到的才是朋友”。
find -name '*.jpg' | # find jpegs
gawk 'BEGIN{ a=1 }{ printf "mv %s %04d.jpg\n", $0, a++ }' | # build mv command
bash # run that command
为了计算项目和构建命令，使用了gawk。不过，请注意主要的区别。默认情况下，find搜索当前目录及其子目录中的文件，因此，如果需要，请确保仅限制在当前目录上搜索(使用man find查看如何执行)。
a=1
for i in *.jpg; do
mv -- "$i" "$a.jpg"
a=`expr $a + 1`
done
