Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (PERL) получение документа с другого сайта / 3 сообщений из 3, страница 1 из 1
28.10.2005, 03:34
    #33348946
Дикий Билл
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) получение документа с другого сайта
Код: plaintext
1.
2.
3.
4.
5.
6.
#!/usr/bin/perl
use LWP::Simple;
$url='http://www.sql.ru/forum/actualforum.aspx';
$content = get($url) or die "Couldn't open $content for reading: $!\n";

print $content;

выдает сообщение
Couldn't open http://www.sql.ru/forum/actualforum.aspx: Bad file descriptor
----------------------------------
- О каком Диком Билле ты говоришь?
- Есть лишь один Дикий Билл.
...
Рейтинг: 0 / 0
28.10.2005, 09:59
    #33349177
Black
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) получение документа с другого сайта
Вам надо наверно получить содержание страницы?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
#!/usr/bin/perl
use strict;
use LWP;

my $url="www.sql.ru";
my $ua=LWP::UserAgent->new();
$ua->agent("Mozilla/5.0");
my $document=$ua->request(HTTP::Request->new(GET => $url));
if($document->is_success) {
    print $document->content;
   }
else {
   die $document->status_line;
   }
...
Рейтинг: 0 / 0
28.10.2005, 10:13
    #33349208
Дикий Билл
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) получение документа с другого сайта
спасибо
----------------------------------
- О каком Диком Билле ты говоришь?
- Есть лишь один Дикий Билл.
...
Рейтинг: 0 / 0
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (PERL) получение документа с другого сайта / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]