 Vie Jul 04, 2008 6:23 am
|
 |
netsoul
Perlero Nuevo
|
Registrado: 04 May 2008
Mensajes: 32
|
|
| Hacer una búsqueda de otra manera |
 |
|
Buenas, disculpenme por la molestia. Gracias digo y soy grato.
Resulta que estoy queriendo hacer una búsqueda en cualquier sitio, ya sea en Google, Yahoo, Live, etc., pero de una manera sencilla que use módulos HTTP::Request::Common qw(POST) y LWP::UserAgent sin usar WWW:Search (es porque tuve problemas con este último).
Mi idea es hacer por el método POST (enviando dato de búsqueda) y como producto el resultado devuelto que luego lo filtraré.
Buscando, tratando de montar algo, hice esto parcialmente:
| Perl: | #!/usr/bin/perl -w
use HTTP:: Request:: Common qw(POST );
use LWP:: UserAgent;
my $ua = LWP:: UserAgent-> new(
agent => 'Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt)';
my $req = POST 'http://www.google.com';
my $respuesta = $ua-> request($req)-> as_string;
print $respuesta, "\n";
|
Hasta aquí me tranqué y no sabría cómo continuar.
Gracias ante todo y perdón si lo he posteado en el lugar equivocado. |
|
|
|
|
Vie Jul 04, 2008 6:34 am
|
|
explorer
Moderador
|
Registrado: 24 Jul 2005
Mensajes: 4018
Ubicación: Valladolid, España
|
|
|
|
|
A mí con GET sí que me funciona:
| Perl: | #!/usr/bin/perl
use HTTP:: Request:: Common qw(GET );
use LWP:: UserAgent;
my $ua = LWP:: UserAgent-> new(
agent => 'Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt');
my $req = GET 'http://www.google.es/search?source=ig&hl=es&rlz=&=&q=perl&btnG=Buscar+con+Google&meta=&aq=f';
my $respuesta = $ua-> request($req)-> as_string;
print $respuesta, "\n"; |
Quizás Google tenga filtrado el método POST...
P.D. Tenías un error en una comilla del 'agent'. |
|
|
Vie Jul 04, 2008 6:39 am
|
|
netsoul
Perlero Nuevo
|
Registrado: 04 May 2008
Mensajes: 32
|
|
|
|
|
Gracias, gracias, sé que es mucho pedirte pero si suponemos que el buscador acepta POST, el código sería más largo, ¿no?.
Gracias. |
|
|
Vie Jul 04, 2008 7:07 am
|
|
explorer
Moderador
|
Registrado: 24 Jul 2005
Mensajes: 4018
Ubicación: Valladolid, España
|
|
|
|
|
| Pues no... no mucho más... en lugar de escribir las opciones en una sola línea como en el GET, en el POST habría que ponerlas como elementos de un array. |
|
|
Vie Jul 04, 2008 7:11 am
|
|
netsoul
Perlero Nuevo
|
Registrado: 04 May 2008
Mensajes: 32
|
|
|
|
|
| Gracias. No sé cuántos euros ya debo por la información. |
|
Powered by phpBB © 2001, 2005 phpBB Group
|
