sbysky 发表于 2005-2-4 17:55:11

如何批量更改文件名大小写

想把一个目录里所有的大写文件名改为小写,请问如何能够实现,多谢了

bart 发表于 2005-2-4 18:06:30

Re: 如何批量更改文件名大小写

想把一个目录里所有的大写文件名改为小写,请问如何能够实现,多谢了


#!/usr/bin/perl -w
use strict;

# Open 'find' process to list files recursively with paths
open(FIND, "find |");
while(<FIND>) {
      chomp;
      next if $_ eq $0;      # Don't rename ourself
      rename($_, lc($_));
      }
close(FIND);

dannycat 发表于 2005-2-6 11:49:43

for i in *; do mv $i `echo $i | tr [:upper:] [:lower:]`; done
页: [1]
查看完整版本: 如何批量更改文件名大小写