如何重新組織Perl中的目錄結構？

Question

我正在編寫重命名/複製文件內容的腳本。

我有temp & temp1文件夾。裏面temp1我有1000個.txt文件與名稱1.txt，2.txt，3.txt ... &在temp文件夾我有一個名爲1，2，3子目錄。

在文件夾1，2，3 ......，我有一個文件擴展名爲java或xml。

我的需求是自動化.txt文件內容的副本，並粘貼到temp子目錄中的相應文件中。使用Perl可以做到這一點嗎？

Answer 1

請參閱perldoc -f rename。您可以在循環中重命名文件。