• Publicidad

No me funciona el Buscador del tutorial...

Todo lo relacionado con el desarrollo Web con Perl: desde CGI hasta Mojolicious

No me funciona el Buscador del tutorial...

Notapor MrPanza » 2005-09-30 19:11 @841

Hola!
Estoy intentando poner un buscador para un sitio pequeño, leí y use el tutorial que hay en este sitio pero no logro que funcione... solucione varias cosas que se me presentaron pero ahora no se como seguir...

En la pág donde deberían aparecer los resultado solo aparece la frase:
Para la búsqueda $query, estos resultados se encontraron:
En $query si aparece la palabra que puse en el buscador, pero no aparece el listado de los resultados...
alguna idea?
este es el link al tutorial http://perlenespanol.com/archives-tut/000138.html
MrPanza
 

Publicidad

Notapor Invitado » 2005-10-01 00:35 @066

estuve probando cosas y basandome en lo que me dice el log, me parece que el buscador fuciona bien... pero como no tiene un mensaje para cuando no encuentra nada directamente me lo deja vacio... ya probé ponendo palabras que se que estan, asi que creo que tenes razón, debe ser que esta mal la ruta... mañana voy a verificar que la ruta sea la correcta y les cuento.... GRACIAS!
Invitado
 

Notapor Alejo » 2005-10-03 08:04 @377

Sigue sin funcionar :( . Me fijé y la ruta estaba bien escrita, pero sigue sin encontrar nada, obviamente puse a buscar palabras que sé que están.
Osea despues de que pongo buscar me aparece el cartelito de "Los resultads para la busqueda xxxx son los siguientes:" y ahí se queda.
Que puede ser??
Alejo
 

Notapor Invitado » 2005-10-03 08:40 @402

CAPO!!!!
ese era el problema!!
Ahora tengo otro.... me da los resultados, pero estan mal linkeados, osea en ves de linkearse a

"http://www.tu-pagina.com/el_archivo_que_corresponda.htm"

, mete en el medio el path que puse para que busque... asi...

"http://www.tu-pagina.com/home/domains/tu-pagina.com/web/el_archivo_que_corresponda.htm"

Pero si le saco el path no busca en donde debería...
Invitado
 

Notapor Alejo » 2005-10-03 13:48 @617

GRACIAS!!!!
funciona perfecto!
Alejo
 

No BUSCA NADA :(

Notapor Juniors » 2005-11-27 15:05 @670

amigos tengo un problema el buscador no busca nada no se que pasa pero lo hize todo y sale estos son la busdas y nada mas mi URL es http://www.ashton.yuukis.com ayudaneme ps lo necesito sy gracias por el Scripts
Juniors
 

A mi tampoco me funciona

Notapor Pepe » 2005-12-22 10:20 @472

Hola:

Ya también instalé el buscador y no me funciona, me da el mismo mensaje de que "se encontraron los siguientes resultados", creo tener todo en orden, esta es mi liga http://www.artecinema.com.mx/buscador.html

Mi proveedor de hosting me dio esta información:

Your site is hosted on clust03.powweb.com.

ServerName: http://artecinema.com.mx
Temp URL: http://arte1623.temp.powweb.com
Secure URLs: https://arte1623.secure.powweb.com
https://artecinemacommx.secure.powweb.com

Use the SSL URL you prefer. Both URL's go to your site.
CGI: Enabled User: arte1623

CGI allows you to run scripts written in perl, php, or another program language to create dynamic content for your website.

Document Root: /www/a/r/artecinema.com.mx/htdocs
Actual Path: /www/a/arte1623/htdocs

The Document Root/actual path is useful to know when configuering CGI scripts and cron jobs.
Logs: This information is now in site tools.

FrontPage: [ Install ]

*****
Y mi código del cgi es el siguiente:

#!/usr/bin/perl -w
use strict;
use CGI qw(:standard);

my $query = param("query");

my $root_dir = '/www/a/artecinema.com.mx/htdocs';
my $url_dir = 'http://artecinema.com.mx';

print header();
print start_html();
print "\n<p>Para la búsqueda $query, estos resultados se encontraron:</p>\n<ol>\n";

undef $/;

find( sub {
return if($_ =~ /^\./);
return unless($_ =~ /\.htm(l)?/i);
stat $File::Find::name;
return if -d;
return unless -r;

open(FILE, "< $File::Find::name") or return;
my $string = <FILE>;
close (FILE);

return unless ($string =~ /\Q$query\E/i);
my $page_title = $_;

if ($string =~ /<title>(.*?)<\/title>/is){
$page_title = $1;
}

my $int_dir = $File::Find::dir;
$int_dir =~ s/$root_dir//i;
my $url = $url_dir . $int_dir . "/" . $_;

print "<li><a href=\"$url\">$page_title</a></li>\n";
}, $root_dir);

print "</ol>\n";

print end_html();


exit(1);

****
Ojalá alguien me pueda orientar pues el buscador nomás no arroja ningún resultado
Pepe
 

ya pude pero...

Notapor Pepe » 2005-12-22 12:46 @573

Hola:

Ya pude hacerlo funcionar, ahora tengo dos dudas:

1.- Cómo cambio el formato del texto, digamos que ponerle tamaño y fuente.

2.- Cómo hago para que los resultados los muestre en una ventana nueva o en algún otro frame
Pepe
 

No jaló

Notapor Pepe » 2005-12-22 16:24 @725

Muchas gracias por la respuesta, pero qué crees?, nomás no me jala eso de que me abra en página nueva
Pepe
 

buscador

Notapor Pepe » 2005-12-27 16:29 @728

necesito que ejecute el cgi en página nueva
Pepe
 

Siguiente

Volver a Web

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados