[plug] Perl script ?

[Bernard Blackham]

On Mon, Oct 31, 2005 at 12:14:37PM +0800, Alex Nordstrom wrote:
> From man rename:
> 
> To translate uppercase names to lower, you'd use
> 
>                rename 'y/A-Z/a-z/' *

Damn. I was going to play perlgolf, but I think that wins regardless :)

Best I had was:
	perl -e 'foreach(<*>){rename$_,lc}'

Bernard.

-- 
 Bernard Blackham <bernard at blackham dot com dot au>