假设我有一个名为GATES,Bill.jpg的文件,我想将它们全部重命名为Bill Gates.jpg.我可以抓住这两个字
rename 's/^(.*?),(.*?)\./$2 $1\./g' *
要更改案例,有一些Perl的功能:
$lower = lc("aBcDe"); # $lower is assigned "abcde" $upper = uc("aBcDe"); # $upper is assigned "ABCDE" $lower = lcfirst("HELLO"); # $lower is assigned "hELLO" $upper = ucfirst("hello"); # $upper is assigned "Hello"
我试着利用它们:
rename 's/^(.*?),(.*?)\./$2 ucfirst($1)\./g' *
但它不起作用.