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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> LWP::Simple, Такого модуля ppm говорит нет :( 
:(
    Опции темы
r
Дата 25.12.2005, 19:56 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Привет всем, Дело в том что модуль такой не могу установить. Он есть я знаю, а вот ppm его не видит, в ФАКЕ этот момент не обсуждался. Что делать не знаю smile . Спасибо.
  Вверх
korob2001
Дата 25.12.2005, 21:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

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



Привет!
Этот модуль входит в стандартный пакет Perl, потому наверное он и не видит его, так как он установлен. Проверить это достаточно просто. Введи в командной строке следующую команду:
C:\>perl -e "use LWP::Simple"
Если не увидешь сообщения об ошибке, значит модуль установлен и готов к использованию.


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
r
Дата 25.12.2005, 23:48 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Я уже решил эту проблемму по другому:
Код

#!/usr/bin/perl -w
use strict;
use CGI::Carp 'fatalsToBrowser';
use CGI qw(:standard);
my $cgi = new CGI;
use LWP;
use LWP::UserAgent;
print $cgi->header( -charset => 'Windows-1251' );
print "GO.....\n";
my $ua = LWP::UserAgent->new;
my $URL = 'http://mpchat.com/amod?';
my $expected_length;
my $bytes_received = 0;
my $res = $ua->request(HTTP::Request->new(GET => $URL),
sub {
my($chunk, $res) = @_;
$bytes_received += length($chunk);
unless (defined $expected_length) {
$expected_length = $res->content_length || 0;
}
if ($expected_length) {
printf STDERR "%d%% - , 1 00 * $bytes_received / $expected_length";
}
print STDERR "$bytes_received bait reseved... \n";
# Обработать каким - образом полученную порцию данных
print "$chunk\n";
});
print $res->status_line, "\n<br>";
exit(0);

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


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

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


 




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


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

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