|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrey Sapozhnikov 2:5020/400 24 Oct 2002 21:34:17 To : Demin Alexander Subject : Re: win->koi8 -------------------------------------------------------------------------------- Demin Alexander wrote: >> Чем можно строку (скаляр) в cp1251 преобразовать в koi8-r? > > Этот скрипт перекодирует все файлы в том месте, из которого ты его запускаешь. > Изучай наздоровье:-)) > #################################################### > #!/usr/bin/perl -w > use Text::Iconv; Привыкаем к perl 5.8 :-) $ perl binmode(STDIN, ':encoding(koi8-r)'); binmode(STDOUT, ':encoding(windows-1251)'); print while <>; ^D вопрос БHОПHЯ ^D теперь в скриптах текстам положено жить в utf8 :-) , а для legacy см. perldoc encode на предмет encode, decode и from_to Последняя в контексте вопроса наиболее интересна. $ perl -MEncode=from_to -pe 'from_to($_, "koi8-r", "windows-1251")' Вопрос бHОПHЯ ^D Андрей --- ifmail v.2.15dev5 * Origin: Demos online service (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/657747a41b1b.html, оценка из 5, голосов 10
|