[Provoz] hledani na debian.cz


To provoz zavinac debian bod cz
From Tomas Znamenacek <tomas bod znamenacek zavinac centrum bod cz>
Date Fri, 4 Jul 2003 21:28:22 +0200
User-agent Mutt/1.5.4i

Hola,

navrhoval bych dat na novou versi webu prohledavani pres google,
posilam formular a jednoduchy skript pro presmerovani dotazu na
google. Dival jsem se na jejich webAPI, bylo by to sexy, ale zatim
neni cas, mozna pozdeji.

Ten formular prijde do hlavniho <div>u sablony stranky.

T.

-- 
/* Halley */

        (Halley's comment.)

Vyhledávání využívá google, takže můžete používat veškeré finesy, na které jste u jeho dotazů zvyklí.

kde hledat  na webu debian.cz
 v cz.comp.linux.debian
dotaz  
#! /usr/bin/perl

use strict;
use warnings;

my %params;
my $query = '';

for my $pair (split(/&/, $ENV{'QUERY_STRING'})) {
        my ($key, $value) = split(/=/, $pair);
        $params{$key} = $value;
}

my $groups = ($params{'where'} eq 'news');
$query = $params{'query'} . ($groups ? '+group%3Acz.comp.linux.debian' : 
'+site%3Adebian.cz');

if ($groups) {
        print "Location: http://groups.google.com/groups?q=$query\n\n";;
} else {
        print "Location: http://www.google.com/search?q=$query\n\n";;
}

Partial thread listing: