(Вопрос)Perl script и html table - Веб-программирование

Goor · 13.09.2002, 11:24

Люди кто может помочь с Перлом?
Проблема такая, есть перловский скрипт и есть html страница, находятся они на разных серверах, скрипт генерит полную страницу.... А нужно на другой странице достать из скрипта только несколько интересующих таблиц

Здесь скрипт

Goor · 13.09.2002, 11:28

А здесь таблица

Stasik · 13.09.2002, 20:03

use IO::Socket;
$server = "www.xxx.ru";
$document = "http://www.xxx.ru/page.html";
$remote = IO::Socket::INET->new(
Proto=>"tcp",
PeerAddr=>$server,
PeerPort=>"80",
Reuse=>1,
Type => SOCK_STREAM)
or print "Can't connect to \"$server\" ($!)\n";
$remote -> send ("GET $document HTTP/1.0\n\n", 0) || return "Can't send query: $!";
@remote = <$remote>;

а потом регулярными выражениями

Goor · 16.09.2002, 03:31

Stasik
You are the best of the best.

13.09.2002, 20:03	# 3
Stasik Registered User Регистрация: 27.03.2002 Адрес: дома Сообщения: 1 660	use IO::Socket; $server = "www.xxx.ru"; $document = "http://www.xxx.ru/page.html"; $remote = IO::Socket::INET->new( Proto=>"tcp", PeerAddr=>$server, PeerPort=>"80", Reuse=>1, Type => SOCK_STREAM) or print "Can't connect to \"$server\" ($!)\n"; $remote -> send ("GET $document HTTP/1.0\n\n", 0) \|\| return "Can't send query: $!"; @remote = <$remote>; а потом регулярными выражениями __________________ Всё будет хорошо!

16.09.2002, 03:31	# 4
Goor Модератор Регистрация: 08.07.2002 Адрес: Germany Сообщения: 397	Stasik You are the best of the best. __________________ Системных администраторов нужно убивать еще в маленьком возрасте, когда они еще только "ламеры" (посвящено другу) В.И.Ленин(Письмо к Фейрбаху, Том12)