perl单行命令01-批量修改文件后缀名

摘要

经常需要批量修改文件名后缀,一个好的方法能让你事半功倍。

批量修改文件名
demo1 cmd中使用单行,把txt后缀转换为pdb后缀
F:\lse>perl -e "while(<*pdb>){($newfile=$_)=~s/pdb$/txt/;print $newfile,qq(\n);rename($_
,$newfile)}"
demo2 powershell中使用单行,把pdb后缀转换为txt后缀
PS F:\lse> perl -e 'while(<*txt>){($newfile=$_)=~s/txt$/pdb/;print $newfile,qq(\n);rename($_,$newfile);}'