А вот если ситуация такая:
вытягиваю всю страницу при помощи
#!/usr/bin/perl
use LWP::Simple qw(get);
use CGI qw(:all);
my $url="
http://www.osta-bremen.de/ecottonflash.htm";
my $cache="futures.txt";
print header;
#if ((-M $cache) > .04) {
my $doc=get($url);
open(CF, ">$cache") || die "ERROR";
print CF $doc;
close(CF);
#}
после этого вся страница находится в переменной $doc.
Дальше мне надо вытянуть таблицу, которая находится между:
и потом эту таблицу напечатать:
print "
";
КАК ЕЕ ВЫТЯНУТЬ ЦЕЛИКОМ? В ней очень много строк.
