BadMad 0 Опубликовано: 10 апреля 2016 Поделиться Опубликовано: 10 апреля 2016 (изменено) Ну и убожеский язык... Я бы скорее повесился чем на таком кодил...:) Если кому интересно (вряд ли, но мне приятно, ибо я таким образом самоутверждаюсь), текст скрипта: #!/usr/bin/perl use HTML::TreeBuilder; use LWP::UserAgent; my $ua = LWP::UserAgent->new; my $tree = HTML::TreeBuilder->new(ignore_unknown => 0); open(F, "< cdkeys.lst"); while(<F>) { chomp; /([^,]+),(.*)/; $cdo{$2} = $1; } close(F); $ua->agent('Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/49.0.2623.110 Safari/537.36'); $ua->default_header('Accept-Language' => "no, en"); $tree = $tree->parse_content($ua->get("http://www.cdkeys.com/xbox-live/games/1")->decoded_content); @pglist = $tree->look_down(_tag=>"div", class=>"pager")->look_down(_tag=>"a"); %cdl = (); foreach $pl (@pglist) { @lil = $tree->look_down(_tag=>"li", class=>"item"); foreach $li (@lil) { next if(! $li->look_down(_tag=>"p", class=>"special-price")); $pname = $li->look_down(_tag=>"h2")->as_text; $plink = $li->look_down(_tag=>"h2")->look_down(_tag=>"a")->attr("href"); $rpr = $li->look_down(_tag=>"p", class=>"old-price")->look_down(_tag=>"span", class=>"price")->as_text; $spr = $li->look_down(_tag=>"p", class=>"special-price")->look_down(_tag=>"span", class=>"price")->as_text; $rpr =~ s/ //g; $spr =~ s/ //g; $cdl{$pname}=$spr; print "\[url=$plink\]$pname\[/url\] \[s\]$rpr\[/s\] $spr\n" if(!defined($cdo{$pname}) || $cdo{$pname} ne $spr); } $p = $pl->as_text; # Get the page number next if($p < 1); $tree = HTML::TreeBuilder->new(ignore_unknown => 0); $tree = $tree->parse_content($ua->get("http://www.cdkeys.com/xbox-live/games/$p")->decoded_content); } open(F, "> cdkeys.lst"); foreach $k (keys %cdl) { print F $cdl{$k},",$k\n"; } close(F); Изменено 10 апреля 2016 пользователем BadMad Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
flashgun 0 Опубликовано: 10 апреля 2016 Поделиться Опубликовано: 10 апреля 2016 Ну и убожеский язык... Я бы скорее повесился чем на таком кодил...:)Парсинг html вообще мерзотная и неблагодарная задача. Для меня это что-то типа судоку. Разгадываешь такой, смотришь, как оно. Мне нравится! Но я и не кодер ни разу. Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Aiser 0 Опубликовано: 10 апреля 2016 Поделиться Опубликовано: 10 апреля 2016 Тогда до кучи парсер цен с amazon'а сделать и со storeparser для xbox 360 игр (ну или как то по другому). Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
flashgun 0 Опубликовано: 10 апреля 2016 Поделиться Опубликовано: 10 апреля 2016 @Aiser, на амазоне нет ничего кроме Forza Motorsport 5: http://www.amazon.com/s/ref=dp_bc_4?ie=UTF8&node=7326775011&rh=n%3A468642%2Cn%3A!11846801%2Cn%3A6469269011%2Cn%3A7326764011%2C Или не там смотрю?Там вообще бредовая какая-то навигация. Игры с download codes есть, но когда поднимаешься уровнем выше в надежде посмотреть полный список, там пусто. Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
SteaX 0 Опубликовано: 11 апреля 2016 Поделиться Опубликовано: 11 апреля 2016 Не там, как обычно ищешь игру и там в опциях будет код на загрузку. Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Aiser 0 Опубликовано: 11 апреля 2016 Поделиться Опубликовано: 11 апреля 2016 @Aiser, на амазоне нет ничего кроме Forza Motorsport 5: http://www.amazon.com/s/ref=dp_bc_4?ie=UTF8&node=7326775011&rh=n%3A468642%2Cn%3A!11846801%2Cn%3A6469269011%2Cn%3A7326764011%2C Или не там смотрю?Там вообще бредовая какая-то навигация. Игры с download codes есть, но когда поднимаешься уровнем выше в надежде посмотреть полный список, там пусто.Да там навигация ещё тот бред. Но игр много. Конечно пока ничего интересного, но бывает раз в пол года скидки. GoW UE по 9.99 $ был недавно. Попробуй по этой ссылке: http://goo.gl/74ppCc Было бы интересно поискать ещё магазины с кодами в других регионах и сделать нечто сравнительное как с Xbox Live, но думаю будет ещё тот геморрой. Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
flashgun 0 Опубликовано: 11 апреля 2016 Поделиться Опубликовано: 11 апреля 2016 Да там навигация ещё тот бред. Но игр много. Конечно пока ничего интересного, но бывает раз в пол года скидки. GoW UE по 9.99 $ был недавно. Попробуй по этой ссылке: http://goo.gl/74ppCc Было бы интересно поискать ещё магазины с кодами в других регионах и сделать нечто сравнительное как с Xbox Live, но думаю будет ещё тот геморрой.Да, это бест-селлеры, то есть заведомо не полный список, плюс можно не успеть с какими-то яркими акциями, которые закончатся до того, как станут "бест". Блин, что-то cdkeys.com чуть не несколько раз в день меняет на пару центов свои цены. Цуко, спамит. Надо думать, как уменьшить трафик в свой адрес. Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
trueisfalse 0 Опубликовано: 11 апреля 2016 Поделиться Опубликовано: 11 апреля 2016 Да, это бест-селлеры, то есть заведомо не полный список, плюс можно не успеть с какими-то яркими акциями, которые закончатся до того, как станут "бест". Блин, что-то cdkeys.com чуть не несколько раз в день меняет на пару центов свои цены. Цуко, спамит. Надо думать, как уменьшить трафик в свой адрес.Фиксируй цену, сравнивай в определенном интервале, то есть если разница между уже имеющейся у тебя ценой и новой менее 99 центов (для примера), то не отправляй :) Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
MrConst 0 Опубликовано: 11 апреля 2016 Поделиться Опубликовано: 11 апреля 2016 Моих скриптов прибыло. Теперь каждый час парсится cdkeys.com, смотрится, какие игры имеют special price, и, если раньше инфа об этой игре мне не присылалась, или цена изменилась, то шлётся письмо с подробностями. Может это не совсем правильно, но что если сделать сортировку по уровню скидки в сторону уменьшения? Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
GRADUS 0 Опубликовано: 11 апреля 2016 Поделиться Опубликовано: 11 апреля 2016 Да там навигация ещё тот бред. Но игр много. Конечно пока ничего интересного, но бывает раз в пол года скидки. GoW UE по 9.99 $ был недавно. Попробуй по этой ссылке: http://goo.gl/74ppCc Было бы интересно поискать ещё магазины с кодами в других регионах и сделать нечто сравнительное как с Xbox Live, но думаю будет ещё тот геморрой. Спасибо - купил автоматрона почти в два раза дешевле чем в русском сторе. Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
H4mster 0 Опубликовано: 11 апреля 2016 Поделиться Опубликовано: 11 апреля 2016 (изменено) Да там навигация ещё тот бред. Но игр много. Конечно пока ничего интересного, но бывает раз в пол года скидки. GoW UE по 9.99 $ был недавно. Попробуй по этой ссылке: http://goo.gl/74ppCc Было бы интересно поискать ещё магазины с кодами в других регионах и сделать нечто сравнительное как с Xbox Live, но думаю будет ещё тот геморрой. http://goo.gl/74ppCc Изменено 11 апреля 2016 пользователем H4mster Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
geodile 81 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 в днсе ryse и forza 5 по 550руб halo, destiny, horizon 2 по 990руб. может еще что есть Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
FROM1560 1 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 в днсеryse и forza 5 по 550рубhalo, destiny, horizon 2 по 990руб.может еще что естьВ отдельных городах видимо. Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Aiser 0 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 (изменено) forza 5Стоит только отметить, что актуально только для Сибирского федерального округа (Типа Кемерово). Предположительно по твоим геоданным. Изменено 12 апреля 2016 пользователем Aiser Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
BladeMix 1 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 В 1с карта оплаты на 2500 стоит 1998 рублей. Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
fallen8rwtf 0 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 (изменено) В эльдорадо/мвидео никто не видел новых оффлайновых акций? Изменено 12 апреля 2016 пользователем fallen8rwtf Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Nortb14 6 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 В эльдорадо/мвидео никто не видел новых оффлайновых акций?промокод ПОЕХАЛИ 12% скидка с 11 по 13 апреля, ток я хз на какие товары ни у кого кодов нет в мвидео? Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
flashgun 0 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 В 1с карта оплаты на 2500 стоит 1998 рублей.Это в 1С-интерес? У меня пишет "нет в наличии" :( Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
BladeMix 1 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 Это в 1С-интерес? У меня пишет "нет в наличии" :(Да, там:) Видимо раскупили:) Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
leolev 0 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 Это в 1С-интерес? У меня пишет "нет в наличии" :(Их уже около года как нет в наличии. Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Pozitife 0 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 (изменено) Привет!Купил цифровой код АС Единство за 292 рубля, на данный момент (4.25 бакса), с магазина сдкейс.ком [spoiler=Прямая ссылка]http://www.cdkeys.com/xbox-live/games/assassin-s-creed-unity-xbox-one, спокойно оплатил визой классик. Единственное, не приходил код подтверждения на телефон при активации цифрового кода, написал им на почту и в течении 5 минут ответили и прислали ссылку на код.Извините если уже где-то писали, но вроде цена еще больше снижена, два дня назад стоил 7.25 бакса.Для всех регионов и на хбокс оне. И кстати на АС black flag - цена тоже 4.25, если кому надо. Изменено 12 апреля 2016 пользователем Pozitife Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
reHgoc 53 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 Привет!Купил цифровой код АС Единство за 292 рубля, на данный момент (4.25 бакса), с магазина сдкейс.ком [spoiler=Прямая ссылка]http://www.cdkeys.com/xbox-live/games/assassin-s-creed-unity-xbox-one, спокойно оплатил визой классик. Единственное, не приходил код подтверждения на телефон при активации цифрового кода, написал им на почту и в течении 5 минут ответили и прислали ссылку на код.Извините если уже где-то писали, но вроде цена еще больше снижена, два дня назад стоил 7.25 бакса.Для всех регионов и на хбокс оне. И кстати на АС black flag - цена тоже 4.25, если кому надо.не идет оплата, точнее фейлиться страница, где нужно указывать данные карты Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
reHgoc 53 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 все получилось, оплатил через пэйпал и смс подтверждение пришло, спасибо Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
SteaX 0 Опубликовано: 12 апреля 2016 Поделиться Опубликовано: 12 апреля 2016 Привет!Купил цифровой код АС Единство за 292 рубля, на данный момент (4.25 бакса), с магазина сдкейс.ком [spoiler=Прямая ссылка]http://www.cdkeys.com/xbox-live/games/assassin-s-creed-unity-xbox-one, спокойно оплатил визой классик. Единственное, не приходил код подтверждения на телефон при активации цифрового кода, написал им на почту и в течении 5 минут ответили и прислали ссылку на код.Извините если уже где-то писали, но вроде цена еще больше снижена, два дня назад стоил 7.25 бакса.Для всех регионов и на хбокс оне. И кстати на АС black flag - цена тоже 4.25, если кому надо.Спасибо , забрал. Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Oppozit 0 Опубликовано: 13 апреля 2016 Поделиться Опубликовано: 13 апреля 2016 не идет оплата, точнее фейлиться страница, где нужно указывать данные картыТакая же ерунда. И через палку тоже ошибку выдает (не грузится страница) Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Рекомендованные сообщения
Создайте аккаунт или войдите в него для комментирования
Вы должны быть пользователем, чтобы оставить комментарий
Создать аккаунт
Зарегистрируйтесь для получения аккаунта. Это просто!
Зарегистрировать аккаунтВойти
Уже зарегистрированы? Войдите здесь.
Войти сейчас