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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как узнать, сущестует ли файл по известному URL, не закачивая этот файл к себе на сервер. 
:(
    Опции темы
BigMazy
Дата 12.10.2007, 23:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Здравствуйте!

Есть задача, которую не знаю как решить:

Существует список URL - адресов, указывающих на картинки с расширением jpg

Как в perl узнать, существует ли эта картинка по адресу или нет?
При этом, не закачивая саму картинку на свой сервер, например, с помощью LWP

Буду благодарен за ответы, Александр


PM MAIL   Вверх
KSURi
Дата 13.10.2007, 00:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



Код

my $url = '...';
my $ua = LWP::UserAgent -> new;
my $res = $ua -> head($url);
$res -> is_success || print $res -> status_line;




--------------------
Died at Life.pl line 21
PM Jabber   Вверх
BigMazy
Дата 15.10.2007, 12:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



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


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

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


 




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


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

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