Perl正则表达式重命名

Sim*_*hor 1 regex perl rename

我正在尝试将目录文件的第一个字母设置为大写.我试过这个:

rename -n 's/^[a-z]/\U$1/' *
Run Code Online (Sandbox Code Playgroud)

但它会删除第一个字符.

我究竟做错了什么 ?

fal*_*tru 7

您没有创建捕获组:

rename -n 's/^([a-z])/\U$1/' *
              ^     ^
Run Code Online (Sandbox Code Playgroud)