ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|

16.03.2010, 23:37
|
|
Новичок
Регистрация: 13.03.2010
Сообщений: 6
Провел на форуме: 20810
Репутация:
0
|
|
Сообщение от Fepsis
Код:
$str = 'логин@домен:пароль';
$str =~ /^(.+?)@(.+?):(.+?)$/;
$login = $1;
$domail = $2;
$pass = $3;
Спс
|
|
|

20.03.2010, 13:22
|
|
Новичок
Регистрация: 15.02.2010
Сообщений: 26
Провел на форуме: 204981
Репутация:
5
|
|
AMN накрутчик
Пытаюсь сделать накрутчик рекламы AMN (adlabs)
Пример сайта с рекламой - _http://nadietah.ru (рекламный блок справа).
Почему-то при таком соединении с сайтом, рекламный блок не выводится.
Код:
my $ua = LWP::UserAgent->new(timeout => 15,
cookie_jar => new HTTP::Cookies,
Referrer => 'http://nadietah.ru',
agent => agent()); #рендомно агент
#until(proxy($ua)){};
print "\nConnecting to site: $siteurl \n";
my $res = $ua->get($siteurl);
#$_ = $res->content;
#my @alllinks = /href="(.+?)"/gi;
my @alllinks = $res->content =~ /href="(.+?)"/gi;
print "Got ".scalar @alllinks . " links\nProcessing...\n";
my @luxlinks;
foreach $key (@alllinks)
{
$key = $key =~ /href=\"(.+?luxup.+?)\"/;
print "$key\n" if $key;
}
В чем подвох?
Спасибо 
|
|
|

20.03.2010, 13:45
|
|
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме: 18127311
Репутация:
1676
|
|
Реклама на сайте выводится с помощью javascript
|
|
|

20.03.2010, 14:16
|
|
Новичок
Регистрация: 15.02.2010
Сообщений: 26
Провел на форуме: 204981
Репутация:
5
|
|
А как его (js) заставить исполнится и отрендерить нужный html ?
|
|
|

20.03.2010, 14:31
|
|
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме: 18127311
Репутация:
1676
|
|
А как его (js) заставить исполнится и отрендерить нужный html ?
Либо использовать модули эмулирующие выполнение js, либо смотри какие запросы шлет браузер, чтобы получить рекламу
|
|
|

24.03.2010, 21:01
|
|
Познающий
Регистрация: 17.01.2010
Сообщений: 33
Провел на форуме: 30813
Репутация:
33
|
|
Сообщение от Fepsis
Код:
$str = 'логин@домен:пароль';
$str =~ /^(.+?)@(.+?):(.+?)$/;
$login = $1;
$domail = $2;
$pass = $3;

my ($a, $b, $c) = split '@|:' => 'a@b:c'
|
|
|

24.03.2010, 21:06
|
|
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме: 18127311
Репутация:
1676
|
|
my ($a, $b, $c) = split '@|:' => 'a@b:c'
Чем этот вариант лучше?
|
|
|

24.03.2010, 21:15
|
|
Познающий
Регистрация: 17.01.2010
Сообщений: 33
Провел на форуме: 30813
Репутация:
33
|
|
Сообщение от Kaimi
Чем этот вариант лучше?
Потому что для этого придумали сплит, обёртку уже на регекспах
|
|
|

24.03.2010, 21:19
|
|
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме: 18127311
Репутация:
1676
|
|
Потому что для этого придумали сплит, обёртку уже на регекспах
Сплит медленнее работает в данном случае
|
|
|

24.03.2010, 21:25
|
|
Познающий
Регистрация: 17.01.2010
Сообщений: 33
Провел на форуме: 30813
Репутация:
33
|
|
http://kaimi.ru/wp-content/uploads/2010/03/odsender_b.zip
Почему же у тебя тут сплитов столько?
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|