Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Spreadsheet::ParseExcel 
:(
    Опции темы
Usya
Дата 11.8.2006, 19:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 154
Регистрация: 7.6.2005

Репутация: нет
Всего: нет



Не могу понять, в чем причина.

Не получается обработать некоторые *.xls-файлы, один из которых (тестовый) я временно разместил здесь.

Даже если взять приведенные в доках код:
Код

    use strict;
    use Spreadsheet::ParseExcel;
    my $oBook = Spreadsheet::ParseExcel::Workbook->Parse('1.xls');
    my($iR, $iC, $oWkS, $oWkC);
    foreach my $oWkS (@{$oBook->{Worksheet}}) {
        print "--------- SHEET:", $oWkS->{Name}, "\n";
        for(my $iR = $oWkS->{MinRow} ; defined $oWkS->{MaxRow} && $iR <= $oWkS->{MaxRow} ; $iR++) {
            for(my $iC = $oWkS->{MinCol} ;  defined $oWkS->{MaxCol} && $iC <= $oWkS->{MaxCol} ; $iC++) {
                $oWkC = $oWkS->{Cells}[$iR][$iC];
                print "( $iR , $iC ) =>", $oWkC->Value, "\n" if($oWkC);
            }
        }
    }

все равно нулевой результат.

Приведенный выше тестовый *.xls-файл не является надуманным. Для сомневающихся могу привести ссылки на соответствующие файлы в инете.

Заранее благодарен за любую помощь в решении этой проблемы.
--------------------
Я не волшебник, я только учусь...
PM MAIL   Вверх
nitr
Дата 11.8.2006, 23:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84



Ну я уже приводил множество причин. К примеру пришлось писать мини-парсер (на скорую руку) для файлов Excel версии 2.0. Очень жаль, что создатель модуля не взял это на заметку, потому что множество программ-вынрузок из БД делают в старую версию, которая совместимая в любой ОС.

Но ваша проблема в другом smile Откройте ваш файл в любом текстовом редакторе или просто просмотр. Это HTML ;) Ну, а парсеров много...

Добавлено @ 23:44 
К примеру переименуй файлик в 1.html и открой в браузере ;)

Добавлено @ 23:46 
Поэтому модуль Spreadsheet::ParseExcel ни при чём smile
Смотри в сторону html ;)


--------------------
PM   Вверх
nitr
Дата 11.8.2006, 23:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84



Ну или можно предположить, что твой выложенный файлик, не тот smile


--------------------
PM   Вверх
Usya
Дата 16.8.2006, 22:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 154
Регистрация: 7.6.2005

Репутация: нет
Всего: нет



СПАСИБО!!!

P/s
Немного запоздавшая благодарность. Просто так получилось, что прочитал сообщение я на следующий день, а пишу сегодня.
Не думал, что все так просто. Я сталкивался со случаями, когда меняют расширения у архивов, но почему-то здесь на это не подумал.
Все гораздо проще, чем кажется на первый взгляд.  smile 
--------------------
Я не волшебник, я только учусь...
PM MAIL   Вверх
nitr
Дата 16.8.2006, 22:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84



Usya, рад помочь. Иногда простая задача, а делаем из неё "слона" ;) Это по загруженности. Всегда лучше попросить помощи, много людей - больше решений ;)


--------------------
PM   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0909 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.