Отправляет email-рассылки с помощью сервиса Sendsay

Кириллица в латынь

Доброго времени дня

Может кто нибудь подскажут как можно облегчить следующую работу.
Проблема появилась после покупки другом DVD вертушки, которая не читает
кириллицу, а друг просит записать
ему музыки. Пример: есть Вот_те_на.mp3 нужно Vot_te_na.mp3 или что
то в этом роде.
Вручную переименовать 20 дисков по 200-300 песен как то не хорошо
становиться.

Еще одна проблема

Из под root делаю: # ln -s /dev/ttyS0 /dev/modem
линк создается и работает но до первой перезагрузки, после перезагрузки
никаких следов от него не остается.
ASPLinux release 10 (Karelia) kernel 2.6.9-1.667asp
Этот линк в принципе мне не требуется. Но все же хотелось понять.

С уважением Иванов Николай

-*Название листа "Linux: разрешение вопросов, перспективы и общение";
Написать в лист: mailto:comp.soft.linux.discuss-list@subscribe.ru
Адрес правил листа http://subscribe.ru/catalog/comp.soft.linux.discuss/rules
Номер письма: 15875; Возраст листа: 569; Участников: 1335
Адрес сайта рассылки: http://www.linuxrsp.ru
Адрес этого письма в архиве: http://subscribe.ru/archive/comp.soft.linux.discuss/msg/315445

Ответить   Sun, 13 Feb 2005 09:20:20 +0300 (#315445)

 

Ответы:

On Sun, 13 Feb 2005 09:20:20 +0300
Николай Иванов <neiv***@p*****.ws> wrote:

Можно и так. Только дополни строки с буквами до полного алфавита и замени в строке

с "open" "DVD/*" на "полный путь к каталогу с твоими файлами/*".
Вариант типа "Ш" -> "SH" не проходит, по этому можно и "Ш" -> "S"

- начало файла -
#!/usr/bin/perl
open(LIST, "ls -1 DVD/*|") || die "ERROR";
while(<LIST>){
/\A(.*?)\n/;
$_ = $1;
$oldname = $_;
tr/[АБВГДЕЖЗИКЛМНОПРСТУФХЦ]/[ABVGDEJZIKLMNOPRSTUFHC]/;
tr/[абвгдежзиклмнопрстуфхц]/[abvgdejziklmnoprstufhc]/;
$newname = $_;
`mv $oldname $newname`
}
close(LIST);
- конец файла -

Буду рад, если помог.
Владимир

-*Название листа "Linux: разрешение вопросов, перспективы и общение";
Написать в лист: mailto:comp.soft.linux.discuss-list@subscribe.ru
Адрес правил листа http://subscribe.ru/catalog/comp.soft.linux.discuss/rules
Номер письма: 15876; Возраст листа: 569; Участников: 1335
Адрес сайта рассылки: http://www.linuxrsp.ru
Адрес этого письма в архиве: http://subscribe.ru/archive/comp.soft.linux.discuss/msg/315597

Ответить   Sun, 13 Feb 2005 22:26:50 +0600 (#315597)

 

Владимир Ковалев пишет:

строке

Думаю сам разберусь еще раз спасибо.
С уважением Иванов Николай

-*Название листа "Linux: разрешение вопросов, перспективы и общение";
Написать в лист: mailto:comp.soft.linux.discuss-list@subscribe.ru
Адрес правил листа http://subscribe.ru/catalog/comp.soft.linux.discuss/rules
Номер письма: 15884; Возраст листа: 569; Участников: 1335
Адрес сайта рассылки: http://www.linuxrsp.ru
Адрес этого письма в архиве: http://subscribe.ru/archive/comp.soft.linux.discuss/msg/315631

Ответить   Sun, 13 Feb 2005 21:12:27 +0300 (#315631)

 

В сообщении от 1108326410 секунд после начала Эпохи Unix Вы написали:

Проще сделать chomp.

Его заглючит на именах, содержащих пробел.
Будут выдаваться ошибки для имен без кириллических букв.

rename-to-translit #!/usr/bin/perl

unless (@ARGV) {
print "Usage: $0 filename...\n";
exit 1
}

for (@ARGV) {
$oldname = $_;
$_ = `echo "$_" |iconv -t koi8-r`;
next if ($? != 0);
chomp;
s/[\xc0-\xdf]/chr(ord($&)-0x60)/eg;
s/[\xe0-\xff]/chr(ord($&)-0xA0)/eg;
system("mv \"$oldname\" \"$_\"")
unless ($oldname eq $_);
}
Использовать:

$ rename-to-translit Вот_те_на.mp3
$ rename-to-translit "Вот те на.mp3"
$ find /my/mp3/files -type f -exec rename-to-translit \{\} \;
$ find /my/mp3/files -depth -exec rename-to-translit \{\} \;

Ответить   Konstantin Korikov Sun, 13 Feb 2005 21:05:41 +0200 (#315656)

 

В сообщении от 13 Февраль 2005 06:20 Николай Иванов написал(a):

Может проще упаковать все в один (или несколько) архивов, назвать из
латиницей, а внутри останутся русские названия?

Думаю, используется файловая система udev, она динамическая, думаю, надо
добавить в файлик /etc/udev/rules.d/udev.rules строчку:
KERNEL="ttyS[0]*", NAME="tts/%n", SYMLINK="modem"

Ответить   Sun, 13 Feb 2005 20:24:40 +0000 (#315610)

 

Sun, 13 Feb 2005 09:20:20 +0300 ко мне пришло письмо, в котором...
Николай Иванов <neiv***@p*****.ws> писал(а):

А не лучше все это дело в архив запихнуть, или tar. В архив можно даже
без сжатия, чтобы друг потом быстрее извлек все добро.

А не пробовали эту команду запихнуть в автозагрузку?

-*Название листа "Linux: разрешение вопросов, перспективы и общение";
Написать в лист: mailto:comp.soft.linux.discuss-list@subscribe.ru
Адрес правил листа http://subscribe.ru/catalog/comp.soft.linux.discuss/rules
Номер письма: 15912; Возраст листа: 570; Участников: 1332
Адрес сайта рассылки: http://www.linuxrsp.ru
Адрес этого письма в архиве: http://subscribe.ru/archive/comp.soft.linux.discuss/msg/316143

Ответить   Analyzer Sun, 13 Feb 2005 21:15:04 +1000 (#316143)

 

Можно, только эта штука умеет показывать фильмы и играть музыку и более
ничего
Скачал translit читаю man, если не получится буду учить perl.

Проблема снята редактированием файла /etc/udev/rules.d/50-udev.rules

Большое спасибо всем откликнувшимся. Тема думаю закрыта.
Всего доброго
С уважением Иванов Николай. :-)

-*Название листа "Linux: разрешение вопросов, перспективы и общение";
Написать в лист: mailto:comp.soft.linux.discuss-list@subscribe.ru
Адрес правил листа http://subscribe.ru/catalog/comp.soft.linux.discuss/rules
Номер письма: 15946; Возраст листа: 571; Участников: 1336
Адрес сайта рассылки: http://www.linuxrsp.ru
Адрес этого письма в архиве: http://subscribe.ru/archive/comp.soft.linux.discuss/msg/316800

Ответить   Tue, 15 Feb 2005 20:55:37 +0300 (#316800)