linux - 如何重命名文件夹中的所有文件并创建重命名图

Question

注意：我可以访问 Linux 和 Windows 平台，因此任何这些平台的答案都很好。

我有一个包含少于 10K .png 文件的文件夹。我想：

1. rename all files as follows:

    <some_filename>.png to 0001.png
    <some_other_name>.png to 0002.png
    <another_name>.png to 0003.png
    and so on...

2. keep this name mapping in a file (see 1 for mapping)

Answer 1

在 Windows 中：这应该按字母顺序对列表进行排序，并用数字重命名它们，填充为 4 个字符。

它写入执行重命名的 bat 文件。您可以在重命名和运行它之前对其进行检查，并兼作文件名的映射。

带有 ! 的文件名 字符可能会是一个问题。

@echo off
setlocal enabledelayedexpansion
set c=0
for %%a in (*.png) do (
set /a c=c+1
set num=0000!c!
set num=!num:~-4!
>>renfile.bat.txt echo ren "%%a" "!num!%%~xa"
)

Answer 2

重命名当前目录中的所有.png文件并将重命名映射保存到renaming-map.txt文件：

$ perl -E'while (<*.png>) { $new = sprintf q(%04d.png), ++$i; say qq($_ $new); 
    rename($_, $new) }' > renaming-map.txt

例如，给定以下目录内容：

$ ls
a.png  b.png  c.png  d.png  e.png  f.png  g.png  h.png  i.png  j.png

它产生：

$ perl -E'while (<*.png>) { $new = sprintf q(%04d.png), ++$i; say qq($_ $new); 
    rename($_, $new) }' 
a.png 0001.png
b.png 0002.png
c.png 0003.png
d.png 0004.png
e.png 0005.png
f.png 0006.png
g.png 0007.png
h.png 0008.png
i.png 0009.png
j.png 0010.png

结果：

$ ls
0001.png  0003.png  0005.png  0007.png  0009.png
0002.png  0004.png  0006.png  0008.png  0010.png

如果 perl 可用，它应该在 Windows 和 Linux 上都可以工作（在 Windows 上替换perl -E'...'为perl -E "..."（单引号 -> 双引号））。