for file in `ls -1|perl -ne 'print "$_" if (/[A-Z]/);'` do mv ${file} `echo ${file}|perl -ne 'chomp;print "$_" if (tr/A-Z/a-z/);'`; done
for i in *; do mv $i `echo $i | tr [:upper:] [:lower:]`; done
if you have lower case files this script will put a warning for them stating target file is same, but it's just a warning, that would change all files to lowercase.
rename 'y/A-Z/a-z/' *