Názor k článku Ruby v příkladech (1) - Úvod od Pichi - Uh, spěchám a opět chyby. Takže kromě toho...

Uh, spěchám a opět chyby. Takže kromě toho krásného fylesystemu je zbytečný ten překlad v regexpu.

use locale;
use utf8;
use File::Spec;
foreach (@ARGV) {
  my ($volume, $path, $name) = File::Spec->splitpath($_);
  $name = lc $name;
  rename $_, File::Spec->catpath($volume, $path, $name);
}

Jestliže ARGV položka bude získána jako unicode, lc převede string jako unicode, pokud ne, akceptuje se nastavení podle locale.