重命名文件时替换并添加前导零

h.m*_*mon 4 regex bash perl rename

请耐心等待,这个帖子会有点长...

我有一堆文件,其中一些文件名称简洁干净(例如1E01.txt),还有一些文件有很多额外内容:

Sample2_Name_E01_-co_032.txt
Sample2_Name_E02_-co_035.txt
...
Sample12_Name_E01_-co_061.txt
Run Code Online (Sandbox Code Playgroud)

等等.这里重要的是"Sample"之后的数字和" Name " 之后的字母+数字- 其余的是一次性的.如果我摆脱了不重要的部分,文件名将减少到与"干净"文件名(2E01.txt,2E02.txt,...,12E01.txt)相同的模式.我已经设法用以下表达式重命名文件(我自己想出这个,不知道是否非常优雅,但工作正常):

rename -v 's/Sample([0-9]+)_Name_([A-Z][0-9]+).*/$1$2\.txt/' *.txt
Run Code Online (Sandbox Code Playgroud)

现在,第二部分是为一个数字添加文件名的前导零,例如1E01.txt变为01E01.txt.我已经成功了(在另一个StackExchange帖子上找到并修改了这个):

rename -v 'unless (/^[0-9]{2}.*\.txt/) {s/^([0-9]{1}.*\.txt)$/0$1/;s/0*([0-9]{2}\..*)/$1/}' *.txt
Run Code Online (Sandbox Code Playgroud)

所以我终于得到了我的问题:有没有办法在一个重命名命令中合并两个表达式?我知道我可以做一个bash脚本来自动化这个过程,但我想要的是找到一个通过重命名的解决方案.

谢谢

kev*_*kev 10

您可以尝试使用此命令重命名1-file.txt0001-file.txt

# fill zeros
$ rename 's/\d+/sprintf("%04d",$&)/e' *.txt
Run Code Online (Sandbox Code Playgroud)

您可以稍微更改命令以满足您的需要.