使用perl重命名同一文件夹中的文件

时间:2014-04-19 15:12:04

标签: perl file-rename

我有一些字幕,但我需要重命名所有没有特定标签的字幕。 西班牙语或任何语言的字幕,标题末尾都有标签。

  

nameofthemovie(西班牙语).SRT

虽然英文字幕必须在最后(英文),但有时他们没有。 所以,我正在寻找一个脚本来重命名所有不包含括号()的字幕 并使用(英语)重命名它们,但扩展名将其从.srt更改为.txt以用于两种语言。

输入文字示例:

nameofaserie.srt
nameofaserie(español).srt

输出示例:

nameofaserie(english).txt
nameofaserie(español).txt

我有很多字幕,手动操作会很累人。 如果这可能与子文件夹,这将是好的,因为我有字幕将它们排列在子文件夹中的顺序,所有这些都在一个名为字幕的文件夹下。

感谢您的帮助。

1 个答案:

答案 0 :(得分:0)

正如TLP已经说过的那样: