Re: несколько вопросов по dia
- To: debian-russian@lists.debian.org
- Subject: Re: несколько вопросов по dia
- From: Alexander Danilov <daapp@land.ru>
- Date: Mon, 2 Jun 2003 12:01:51 +0400
- Message-id: <[🔎] 20030602120151.1a72d14e.daapp@land.ru>
- In-reply-to: <20030530133920.GA1177@alex>
- References: <20030526195643.GA4165@alex> <20030529105005.2a810181.shir80@mail.ru> <20030529080101.GA2586@alex> <20030529171635.65cbda7f.shir80@mail.ru> <20030529151524.GA1404@alex> <20030530132141.2c2906dd.daapp@land.ru> <20030530133920.GA1177@alex>
On Fri, 30 May 2003 17:39:20 +0400
"Alexander S. Gordienko" <alex-go@ptlan.com> wrote:
> On Fri, May 30, 2003 at 01:21:41PM +0400, Alexander Danilov wrote:
> > > Спасибо. Работает, но т.к. dia работает с utf-8, то и в *.fig получается
> > > нечто вроде
> > >
> > > 4 1 0 0 0 0 17.071654 0.0 4 0.0 0.0 6141 354
> > > \320\242\320\265\321\205\320\275\320\270\321\207\320\265\321\201\320\27
> > > 2\32
> > > 0\270\320\265\321\201\321\200\320\265\320\264\321\201\321\202\320\262\3
> > > 20\2 60\001
> > >
> > > И результат --- текст нечитабельный.
> > >
> > > Вполне очевидно, что эта строка в utf-8, но как ее перегнать в такую же,
> > > но в koi8-r, я честно говоря незнаю.
> > >
> > > Может кто-нибудь подскажет, как это сделать?
> >
> > Варианты
> > 1. использовать iconv(но может и не сработать)
> > 2. использовать vim
> > 3. говорят konwert хорош, не знаю, сам не пробовал
>
> Знаб все ворианты, НО обращаю внимание, что символы представлены парой
> восьмеричных чисел, так например \320\242 - одна буква русского
> алфавита. И я пока не знаю, как можно это перекодировать в нормальный
> тест, который конвертнуть из utf-8 в koi8-r одним из перечисленных
> способов, а потом конвертнуть обратно в восьмеричное представление.
>
> Ничего на ум, кроме написания программы на C, пока не приходит :-(.
>
cat file | perl -pe 's/\\([0-3][0-7]{2})/chr oct $1/eg'
перед -pe можно добавить ключ -i по вкусу ;)
--
Alexander Danilov
UIN: 164825399
Home Page: http://fssg.st-oskol.ru/~alex/
* Origin: If you can't do it in Perl, you don't want to do it.
Reply to: