use File::Find; find (sub {rename $_, lc $_ }, @ARGV); [download]
In reply to Re^2: Renaming Not Working by inman in thread Renaming Not Working by Anonymous Monk