Следите за новостями русскоязычного сообщества Ubuntu в Twitter-ленте @ubuntu_ru_loco
0 Пользователей и 1 Гость просматривают эту тему.
#!/usr/bin/perluse File::Spec;foreach (@ARGV) { (undef,$directory,$filename) = File::Spec->splitpath($_); $filename =~ s/_/ /g; $filename =~ s/(\w+)/\u$1/g; $filename =~ s/mp3$/mp3/i; rename $_, File::Spec->catpath(undef,$directory,$filename);}
chmod +x созданный_файл
./rename_mp3 *.mp3
Страница сгенерирована за 0.035 секунд. Запросов: 20.