ablog

不器用で落着きのない技術者のメモ

Perl ワンライナーでファイル名一括置換

Perl があれば何でもできる。

C:\temp>dir /b
1_from.txt
2_from.txt
3_from.txt

C:\temp>dir /b|perl -nle "$o=$_;$_=~s/from/to/i;rename($o,$_);"

C:\temp>dir /b
1_to.txt
2_to.txt
3_to.txt

404 Blog Not Found : perl - ワンライナーの書き方入門 を参考にしました。弾さんありがとうございます。

find . -type f|perl -nle '$o=$_;$_=~tr/A-Z/a-z/;rename($o,$_);'