ippoman

Рейтинг
117
Регистрация
21.02.2008
zatupokseo:
выдачу коммерческих запросов модерят вручную, причем отдают предпочтения тем кто использует директ

это только ощущение :)

chemax, в предпоследней строке offsetheight, замените на offsetHeight.

Jefa:
И колонки в форточку

так не май месяц же... :)

Обзаведитесь наушниками и слушайте Вивальди, Времена года - Зима. :)

OMG WTF?:

Суть заработка походит на МЛМ пирамиду,
Особых знаний/усилий не требуется, нужны небольшие первоначальные вложения

Как говорил Штирлиц Мюллеру,

- вот с этого и надо было начинать!

VORONOY:
top100site.org

топуанхандредсайт.орг так приблизительно читается... не звучит как-то. думаю что номинал.

Fosya:
Уважаемые гуру, подскажите новичку, каким образом можно оптимизировать к выдаче главную страницу доски объявлений, если из контента на ней, имеются только ссылки на последние добавленные объявления? Спасибо

Пишите, пишите и еще раз пишите.

ula741:
Дайте совет, имеющие опыт! Стоит ли при раскрутке форума прибегать к услугам сервисов по наполнению форумов постами или нет?

а вы уже где-то видели пустой раскрученный форум?

ustas32:
Вопрос родился потому как очень много сайтов (включая этот) используют Live Internet на котором по моему мнению слишком много рекламы и не такое удобное юзабилити как у Яндекс.Метрики. Спасибо

Мне например реклама на ЛИ ничуть не мешает смотреть статистику своих сайтов.

Скрипт сделал на perl.

list_domains.txt - в этот файл заряжаете домены

get_cy.pl - в этот файл копируете нижний код

cy_min10.txt - в этот файл будут заходят все домены тиц у которых > 10


#!/usr/bin/perl

use strict;
use LWP::UserAgent;

open( my $fh, "list_domains.txt" );
my @domains = <$fh>; #Заносим в список домены из файла
close( $fh );

my $cy_max = 10;

my $ua = LWP::UserAgent->new(agent => 'Mozilla/4.0 (compatible; GoogleToolbar 2.0.111-big; Windows XP 5.1)' );
open( my $fh1, ">>cy_min10.txt" );
foreach my $domain ( @domains ) {
chomp( $domain );
my $url_bar = "http://bar-navig.yandex.ru/u?show=31&url=http://$domain/";
my $response = $ua->get($url_bar);

if ( $response->is_error() ) {
#Ошибка
print $fh1 $domain, " - ", "Error\n";
}
else {
my $content = $response->content();
$content =~ /value="(\d+?)"/;
my $cy = $1;
if ( $cy > $cy_max ) {
print $fh1 $domain, " - ", $cy, "\n";
}
}
}
close( $fh1 );
Всего: 783