LINUX.ORG.RU

Скриптреквест: выдача первой ссылки в гугле


0

0

Нужен скрипт, который по заданному запросу сформирует и заберёт запрос у гугла, потом его распарсит и выдаст ответ в plain-текстовом виде.

Пробовал потыкать libnet-google-perl, но даже пример из манов работать не захотел.

P.S. Хорошо бы то же самое и для яндекса. P.P.S. Сам написать не расклеюсь, но хотелось бы готовенького.

★★

Ответ на: комментарий от wfrr

Оба раза мимо. Мне его надо из консольки дергать, а не к сайту прикручивать.

gaa ★★
() автор топика

> Пробовал потыкать libnet-google-perl, но даже пример из манов работать не захотел.

А у меня работает, но как-то избирательно. Например, слово «жопа» искать не хочет.

Deleted
()
Ответ на: комментарий от Deleted

#!/usr/bin/perl
use Net::Google;
use constant LOCAL_GOOGLE_KEY => "ouMVkMNQFHLQxhw96VunraH5SRWyRBhf";
close(STDERR);

my $google = Net::Google->new(key=>LOCAL_GOOGLE_KEY);
my $search = $google->search();
my $query = join(' ', @ARGV);
$query = "\"$query\"" if int(@ARGV) == 1;

$search->query($query);
$search->lr(qw(ru en));
$search->starts_at(0);
$search->max_results(15);

print "| \x1b[31m$query\x1b[0m |\n\n";
map {
        my $title = $_->title();
        $title =~ s/<b>/\x1b[33m/g;
        $title =~ s/<\/b>/\x1b[0m/g;
        print $title."\n";
        print "\x1b[36m".$_->URL()."\x1b[0m\n\n";
} @{$search->results()};

Deleted
()

Кнопочку "Мне повезёт!" в Гугле видел? Вот это и есть первая ссылка - дальше писать три строчки, давай - не расклеивайся:)

golodranez ★★★★
()
Ответ на: комментарий от Deleted

Спасибо, вроде работает. Только вот меня сильно смущает:

> use constant LOCAL_GOOGLE_KEY => "ouMVkMNQFHLQxhw96VunraH5SRWyRBhf";

gaa ★★
() автор топика
Ответ на: комментарий от golodranez

> Кнопочку "Мне повезёт!" в Гугле видел? Вот это и есть первая ссылка - дальше писать три строчки, давай - не расклеивайся:)

я ей не пользовался никогда: всй больше через :o gg something хожу

gaa ★★
() автор топика
Ответ на: комментарий от wfrr

> А это тот самый ключ что нужно получить по ссылке которую я давал.

Придётся лицензию читать, ведь я это не для личного использования делать собираюсь. А всякие регистрационные ключи попахивают анальным рабством...

gaa ★★
() автор топика
Ответ на: комментарий от wfrr

Не совсем. Боюсь, что для SOAP Search API (http://code.google.com/intl/ru/apis/soapsearch/) и AJAX Search API используются разные ключи. Для SOAP ключи уже не выдают. В скрипте использован не мой ключ, а найденный в гугле ключ для бота sulci.

Deleted
()

Может подойти вариант (perl|ruby|python)+Mechanize

В примерах использования обычно есть и парсилка результатов поиска гугла.

painEffect
()
Ответ на: комментарий от alex_custov

Да, что-то нашёл. Спасибо участвовавшим.

gaa ★★
() автор топика
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.