[Perl] Новичкам: задаем вопросы

ВЫЕЗД ИЗ УКРАИНЫ • ОФОРМЛЕНИЕ ДОКУМЕНТОВ • БРОНИРОВАНИЕ • ПОМОЩЬ С ТЦК

УСТРАНЕНИЕ КОНКУРЕНТОВ. БЛОКИРОВКА ДОМЕНОВ, БЛОКИРОВКА ИНСТАГРАМ/ТЕЛЕГРАМ И ДРУГОЕ. ПРОВЕРЕННЫЙ СЕЛЛЕР.

НОВЫЕ ТОРГОВАЯ НОВОСТИ

Скрыть

		ANTICHAT > ПРОГРАММИРОВАНИЕ > PHP
[Perl] Новичкам: задаем вопросы

Страница 153 из 156

153

Опции темы

Поиск в этой теме

Опции просмотра

#1521

20.05.2010, 08:35

kodep

Новичок

Регистрация: 29.01.2010

Сообщений: 10

С нами: 8569856

Репутация: 0

Код:

#!/usr/bin/perl
use LWP::UserAgent;
$ua=LWP::UserAgent->new;
$ua->timeout(10);
$ua->agent("Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)");
$url='http://www.digitalcybersoft.com/ProxyList/fresh-proxy-list.shtml?CONNECT';
$page=$ua->get($url);
open(LOAD,">./proxy.txt");
while($page->content=~m/(\d+\.\d+\.\d+\.\d+)\:(\d+)/)
{ 
print LOAD $1.":".$2."\n";
print $1.":".$2."\n";
}

мне нужно что бы скрипт грабил все прокси с опреденной страницы, а скрипт записывает в файл один прокси много раз

#1522

20.05.2010, 08:46

krypt3r

Познавший АНТИЧАТ

Регистрация: 27.04.2007

Сообщений: 1,044

С нами: 10021597

Репутация: 905

Модификатор g

#1523

20.05.2010, 09:31

kodep

Новичок

Регистрация: 29.01.2010

Сообщений: 10

С нами: 8569856

Репутация: 0

Цитата:

Сообщение от krypt3r

Модификатор g

я пробовал и с ним и без него все равно... кто нибудь исправьте ошибку в скрипте ))

#1524

20.05.2010, 09:36

Kaimi

Познавший АНТИЧАТ

Регистрация: 23.08.2007

Сообщений: 1,237

С нами: 9851426

Репутация: 1676

$page->content помести перед while, например, так:

$page=$ua->get($url)->content;
........
while($page =~ .....

#1525

20.05.2010, 09:41

kodep

Новичок

Регистрация: 29.01.2010

Сообщений: 10

С нами: 8569856

Репутация: 0

Цитата:

Сообщение от Kaimi

$page->content помести перед while, например, так:

$page=$ua->get($url)->content;
........
while($page =~ .....

все сделал как ты сказал, заработало...спс

#1526

20.05.2010, 18:44

Strilo4ka

Reservists Of Antichat - Level 6

Регистрация: 05.04.2009

Сообщений: 231

С нами: 9000386

Репутация: 1148

Научите меня куки устанавливать с ресурса правильно...
И посылать их каждый раз при последующих запросах.
Используя Libwww. Мб участки кода

СПС

#1527

21.05.2010, 07:31

krypt3r

Познавший АНТИЧАТ

Регистрация: 27.04.2007

Сообщений: 1,044

С нами: 10021597

Репутация: 905

Код:

use strict;
use LWP::UserAgent;
use HTTP::Cookies;
my $cookie_jar = HTTP::Cookies->new ('file' => 'cookie.txt', 'autosave' => 1);
my $ua = LWP::UserAgent->new;
$ua->cookie_jar ($cookie_jar);

либо

Код:

$ua->cookie_jar (HTTP::Cookies->new ('file' => 'cookie.txt', 'autosave' => 1));

#1528

27.05.2010, 23:16

Vlad&slav

Участник форума

Регистрация: 01.01.2009

Сообщений: 138

С нами: 9135251

Репутация: 82

как мне сделать?
переменная = 0;
Потом запускаю функцию в несколько потоков и в функции к переменной прибавляем число
Переменная должна увеличиваться тоесть какбе быть глобально

чтобы было понятно
надо получить не 22222 а 2345678

PHP код:


		
			
use Threads;

use Threads::shared;



my $a = 1;

my $threads = 10;



for(1..$threads) { $thread[$_] = threads->create(\&b);}

for(1..$threads) { $thread[$_]->join; }



sub b {

$a = $a + 1;

print $a."\n";

}



sleep 123;

Последний раз редактировалось Vlad&slav; 27.05.2010 в 23:36..

#1529

28.05.2010, 01:46

.Slip

Leaders of Antichat - Level 4

Регистрация: 16.01.2006

Сообщений: 1,966

С нами: 10692266

Репутация: 3486

my $a : shared = 1;

#1530

02.06.2010, 10:54

kodep

Новичок

Регистрация: 29.01.2010

Сообщений: 10

С нами: 8569856

Репутация: 0

не как не врублюсь в многопоточность вот я запустил скрипт который сверху 10 потоков прошло и скрипт вырубился можно показать на скрипте сверху как брать логины из txt файла login;password и подключаться к например к сайту как бы сделать авторизацию

Страница 153 из 156

153

Предыдущая тема Следующая тема

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
[c/c++] Новичкам: задаем вопросы	_Great_	С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby	5421	21.04.2026 07:37
[php] Новичкам: задаем вопросы	_Great_	PHP	16396	17.06.2010 21:19
Вопросы по Ipb 2.0	Voodoo_People	Уязвимости CMS / форумов	26	15.02.2005 22:57

Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)

Быстрый переход