Есть архив: tstyle.zip
В нем файл: Прайс-лист.xls
Не могу извлечь файл из архива с помощью unzip.
Причем до этого работал с десятком подобных файлов-проблем не было.
Не подскажете в чем здесь может быть проблема?

Заранее благодарен

Скорее всего повреждён сам архив, почитай этот топик:
http://forum.vingrad.ru/index.php?showtopic=33691
и попробуй извлечь иным способом.

С архивом все в порядке - это прайс-лист одной из фирм
И кажется я понял, где собака зарыта - они rar-овскому архиву дали zip-овское расширение
Зачем только???!!
У меня проскальзывала эта мысля до того как задать вопрос, почему-то тогда я ее пробросил

Но все равно спасибо, полезные советы никогда лишними не бывают

Еще одна проблема

Не могу понять, в чем загвоздка.

Код

Код

#!/usr/bin/perl print "Content-Type: text/html; charset=windows-1251\n\n"; use LWP::UserAgent; $au = LWP::UserAgent->new(); $doc=$au->request(HTTP::Request->new(GET=>'http://www.compcenter.ru/pricelist/ccprice.zip')); if ($doc->is_success) {print 'Ok'} else {print 'Error'};

нормально работает только с моего компа, с сервака выдает Error.
Причем до этого не один раз таким образом заливал файлы, пока не наткнулся на этот камень

А ты уверен, что ты указал правильный URL?

Вручную (т.е. , если указать url в строке адреса браузера) загружется...
Сейчас только проверял

У меня адрес: http://www.compcenter.ru/pricelist/ccprice.zip
возвращает "Невозможно отобразить страницу".
А вот если вставить другой URL, то в сё работает:
Например:

Код

#!/usr/bin/perl print "Content-Type: text/html; charset=windows-1251\n\n"; use LWP::UserAgent; $au = LWP::UserAgent->new(); $au->agent("NotForYou/1.0"); $r = HTTP::Request->new(GET=>'http://script.woweb.ru/index.htm?a~g;id~1023483342;t~1'); $doc=$au->request($r); if ($doc->is_success) {print 'Ok'} else {print 'Error'};

Может нужно еще и тип указать?

Код

#!/usr/bin/perl print "Content-Type: text/html; charset=windows-1251\n\n"; use LWP::UserAgent; $au = LWP::UserAgent->new(); $au->agent("NotForYou/1.0"); $r = HTTP::Request->new(GET=>'http://script.woweb.ru/index.htm?a~g;id~1023483342;t~1'); $r->header( Accept => 'application/zip' ); # Вот здесь. $doc=$au->request($r); if ($doc->is_success) {print 'Ok'} else {print 'Error'};

Удачи.

Это сообщение отредактировал(а) korob2001 - 12.6.2005, 14:01

Цитата

У меня адрес: http://www.compcenter.ru/pricelist/ccprice.zip

Тогда я что-то совсем не понимаю???????
Только что нажал на ссылку в предыдущем сообщении и заново закачал файл - все работает на ура

Может проблема в том, откуда ведется закачка - либо не со всех серваков можно туду достучаться (по крайней мере сегодня), либо стоит ограничение на закачку в зависимости от того, откуда идет запрос, хотя это глупо!!!

Цитата

А вот если вставить другой URL, то в сё работает

Я аналогичным образом уже не один десяток раз закачивал, поэтому не совсем понял юмора, когда столкнулся с этой проблемой

Цитата

Может нужно еще и тип указать?

По нулям - тоже самое. Кстати, пробовал пару других файлов закачать (*.jsp) - то же самое, хотя по сайту могу лазить без проблем

Sorry
В прошлом сообщении забыл подписаться
Это опять я

В течении нескольких дней после первого сообщения, пока я ждал какого-нибудь предложения по этой проблеме, все оставалось по прежнему
На днях залез - работает
Код здесь абсолютно не причем
Что там было, тоже не очень интересно, - т.к. от меня решение проблемы абсолютно не зависело...

А написал, чтоб закрыть тему

М	Тема закрыта :)

Это сообщение отредактировал(а) korob2001 - 27.6.2005, 06:36