[SOLUTION] Re: lug-bg: utf,ansi,unicode etc...

[raptor <raptor@xxxxxxxxxx>]

pyrwo mersi za pomoshta...
Naistina  w GEDIT ima wariant :") ma na koi da gleda...
Taka za wsichki koito polzwat gedit :
Edit\Preferences\Save da si naglasqt :

When saving existing file ... Use original encoding if possible
When saving new file ... Use current locale's encoding if possible

Oswen towa w  Edit\Preferences\Open da si dobawqt encoding-ite koito im sa nuvni..

taka a sega resheine za tezi koito sa opleskali nestata kato men i weche sa go zapisali faila wyw UTF8...

1. perl -MCPAN -e 'install Convert::Cyrillic'
2. perl -MCPAN -e 'install Lingua::DetectCharset'
3. pishete si tozi perl script :

#!/usr/bin/perl
use Convert::Cyrillic;
use Lingua::DetectCharset;
undef $/;
while (<>) {
    $cs = Lingua::DetectCharset::Detect $_;
    print Convert::Cyrillic::cstocs($cs,'win',$_);
}


4. izpalnqwate go ei taka :

./2win1251.pl filename.txt > newfilename.txt

zabelevki *** : 
 - faila w koito zapiswate trqbwa da e s drugo ime :") inache ste poluchite fail s 0 bytes size
 - ako mahnete "undef $/" move dave wseki red da e razlichen encoding :") 


raptor
============================================================================
A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers).
http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora
To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
============================================================================