powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (PERL) получение документа с другого сайта
3 сообщений из 3, страница 1 из 1
(PERL) получение документа с другого сайта
    #33348946
Фотография Дикий Билл
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: 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
(PERL) получение документа с другого сайта
    #33349177
Фотография Black
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вам надо наверно получить содержание страницы?

Код: 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
(PERL) получение документа с другого сайта
    #33349208
Фотография Дикий Билл
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
спасибо
----------------------------------
- О каком Диком Билле ты говоришь?
- Есть лишь один Дикий Билл.
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (PERL) получение документа с другого сайта
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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