Select Code to Download

for (readdir DIR) {
...
    rename("$path/$_", lc("$path/$_")) or print "Couldn't rename $file
+: $!\n";
}

for (readdir DIR) {
...
    rename("$path/$_", lc("$path/$_")) or print "Couldn't rename $_: $
+!\n";
}