U prethodnom "odgovoru" koji sam dao rekao(napisao) sam da isprobas ovaj skript a nisam ga naveo.Izvinjavam se.Evo prostog skripta:
use LWP::Simple;
$site=get('
http://www.krstarica.com/recnik/srpsko-engleski/index.php?u=kuca');
@site=split(/\n/,$site);
$_=join("\n",@site[140..145])."\n";
print
Kako da iz nekog FAJLA procitam unicode znake?
Kada vrsim zamenu unicode karaktera sa tr/čćžš/cczs/
i s/đ/dj/g u stringu koji sam uneo u toku programa
nema problema ali kada se ocitava taj string iz fajla
onda dolazi do greske tj. nema zamene unicode kraktera
posto ih program ne tretira kao takve.Valjda treba da
se koristi funkcija unpack ali kako?
Ako ne ukljucim pragmu use utf8 onda nece da izvrsi zamenu
uopste.Ako pokusam da ispisem te karaktere iz fajla nece
dok ne ukljucim pragmu use encode 'utf8';
[Ovu poruku je menjao misa vranje dana 11.02.2005. u 21:51 GMT+1]