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

sbysky

UID: 42954
帖子: 15
积分: 34
在线时间: 10 分钟

1^# sbysky 发表于 2005-02-04 17:55

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

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

bart

UID: 44050
帖子: 64
积分: 147
在线时间: 5 小时

2^# bart 发表于 2005-02-04 18:06

[quote:7c78a34186="sbysky"]想把一个目录里所有的大写文件名改为小写，请问如何能够实现，多谢了[/quote]

[code:1]
#!/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);

[/code:1]

dannycat

UID: 43283
帖子: 149
积分: 342
在线时间: 1 天 6 小时

3^# dannycat 发表于 2005-02-06 11:49

[code:1]for i in *; do mv $i `echo $i | tr [:upper:] [:lower:]`; done[/code:1]