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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как грабить строки со страниц сайта? 
:(
    Опции темы
user88
  Дата 16.10.2007, 19:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 1
Регистрация: 16.10.2007

Репутация: нет
Всего: нет
Здраствуйте, есть site.ru, на нем постятся новости index.php?id=1 итд до 863.... нужно сохранить эти новости в txt файл....... помогите написать скрипт  smile 
PS на каждой странице по 10 новстей, перед названием новости есть слово "дата"
PM MAIL   Вверх
KSURi
Дата 16.10.2007, 19:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 887
Регистрация: 8.6.2006
Где: Russia

Репутация: 20
Всего: 27
Код

#!perl

use strict;
use warnings;

use LWP::UserAgent;

my $SITE = 'http://site./ru/index.php?id=';

my $ua = LWP::UserAgent -> new;

for(1..863)
{
    my $res = $ua -> get($SITE . $_);
    $res -> is_success || warn "ID = $_ - Failed" and next;
    
    open(OUT, '>', "$_.txt") || die $!;
    print OUT $res -> content;
    close OUT;
}



--------------------
Died at Life.pl line 21
PM Jabber   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




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


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

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