ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Timur Vafin 2:5020/400 27 Nov 2002 23:17:13
To : All
Subject : KOI2utf8
--------------------------------------------------------------------------------
Мир вертится, коннект нормальный, а посему приветствую вас All
Что не правильно делаю?
sub koiToUtf8 {
my $query = shift;
open A, "iconv -f KOI8-R -t UTF-8";
print A $query;
$query = <A>;
close A;
return $query
}
Всё будет хорошо...
--- ifmail v.2.15dev5
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
