|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Nikolay Pichtin 2:5056/30 01 Jun 2004 08:30:11 To : Jahor Miadzviedziew Subject : Re: Unicode -> CP1251 -------------------------------------------------------------------------------- NP>> use XML::Excel; NP>> my $csv_obj = XML::Excel->new(); NP>> my @arr_of_headings = ('one', 'two', 'three', 'four','five'); NP>> $csv_obj->{column_headings} = \@arr_of_headings; NP>> $csv_obj->parse_doc("./Dat/price.xls"); NP>> $csv_obj->print_xml("95.xml", NP>> {format => " ", file_tag => "table", record_tag "record_data"}); NP>> Hо ни как не могу перевести из Unicode в CP1251. Подскажите!!! JM> perldoc Text::Iconv JM> use Text::Iconv; Дело в том, что я использую Perl от Activestate, а там нет такого модуля. Пока выкрутился тем, что сделал правку в XML/Excel.pm Путем включения use Spreadsheet::ParseExcel; use Spreadsheet::ParseExcel::FmtUnicode; * В Hewlett-Packard со своим принтером не ездят -- Hиколай ---------------------------------------------------------------------- --- * Origin: Истина - это вовсе не то, что можно убедительно доказать (2:5056/30) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/181340bc3f0a.html, оценка из 5, голосов 10
|