ファイルリストに拡張子を追加するPerlメソッドを決定しようとしています。すでに特定の拡張子を持つファイルのリストの名前を別の拡張子に変更することはできますが、すでに拡張子があるかどうかにかかわらず、すべてのファイル名でこれを行うことができるはずです。
たとえば、次のファイルのリストがあります。
file1
file2
file3
ps.dir
私はそれらの名前をすべて次のように変更したいと思いますfilename.extension
:
file1.bad
file2.bad
file3.bad
ps.dir.bad
ベストアンサー1
シェルにrename
Perlがインストールされている場合(時々と呼ばれるprename
):
rename -v 's/$/.bad/' *
ファイルが多すぎてシェル*
グロップがそれらをすべて処理できない場合は、find
次のように混合して一致させることができます(または+
必要に応じて次に置き換えます)。\;
find . -maxdepth 1 -exec rename -v 's/$/.bad/' {} +
Perlの場合は、move
標準モジュールで使用してください。
use File::Copy;
for (<*>) { move($_, "$_.bad"); }