|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexander 2:5020/400 08 May 2002 18:41:01
To : All
Subject : Spreadsheet::ParseExcel - русский текст
--------------------------------------------------------------------------------
Для вытаскивания текста из файлов Excel и сохранения в txt воспользовался
Spreadsheet::ParseExcel.
За основу взят стандардный пример:
use Spreadsheet::ParseExcel;
use Spreadsheet::ParseExcel::FmtUnicode;
my $oExcel = new Spreadsheet::ParseExcel;
my $oFmtJ = Spreadsheet::ParseExcel::FmtUnicode->new(Unicode_Map =>
'CP1251');
my $oBook = $oExcel->Parse($ARGV[0], $oFmtJ);
---------------------------------------
и т.д.
Все происходит в Виндоувз.
Пока работаешь со скриптом через интерпретатор все просто великолепно,
получается прекрасный русский текст. Hо после компиляции в exe посредством
как Perl2exe так и PerlApp вместо русского текста полуается какая-то
гадость:
( 1 , 2 ) =>...0.B.0
( 2 , 0 ) =>...5.G.5.@.8.=.:.0 "...;.8.1.8 P a r t y " .
...K.A.B.C.?.;.5.=.8.5 ...8.<.K ...;.8.<.0.H.5.=.:.> .8 .3.@.C.?.?.K
"...;.8.1.8 "
Причем ни Perl2exe ни PerlApp абсолютно ни на что не жалуются.
Что можно придумать?
--- ifmail v.2.15dev5
* Origin: Digital Generation (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
