Lucene Lucene es un PERL API al puerto C del motor de búsqueda de Lucene.
Descargar ahora

Lucene Clasificación y resumen

Lucene Etiquetas

buscador Módulo perl Puerto Lucene Puerto Lucene C

Lucene Descripción

Lucene es un PERL API al puerto C del motor de búsqueda Lucene. Lucene es un PERL API al puerto C del motor de búsqueda de Lucene. HSYNOPSISInitialize / vacía índice de Lucene My $ Analyzer = New Lucene :: Analysis :: Standard :: Standardanalyzer (); My $ Store = Lucene :: Store :: FSDIRECTORY-> GetDirectory ("/ Home / Lucene", 1); MY $ TMP_WRITER = NUEVO LUCENO :: Índice :: IndexWriter ($ Tienda, $ Analizador, 1); $ tmp_writer-> cerrar; UNDEF $ TMP_WRITER; Elija su analizador (tokenizador de cadena) # Baja de texto en el texto y divídelo en los caracteres de no carta My $ Analyzer = New Lucene :: Analysis :: Simpleanalyzer (); # Igual que antes y elimina las palabras de parada My $ Analyzer = New Lucene :: Analysis :: Stopanalyzer (); # Igual que antes, pero usted proporciona sus propias palabras de parada My $ Analyzer = New Lucene :: Analysis :: Stopanalyzer (); # Divide el texto en los caracteres del espacio en blanco My $ Analyzer = New Lucene :: Analysis :: WhitespaceAnalyzer (); # Baja de texto, tokenizada, se tokenizada basada en una gramática que # se deja a las autoridades nombradas intactas (correos electrónicos, nombres de empresas, # nombres de hosts web, direcciones IP, etc.) y eliminadas las palabras de parada My $ Analyzer = New Lucene :: Análisis :: Normal: : Standardanalyzer (); # Igual que antes, pero usted proporciona sus propias palabras de parada My $ Analyzer = New Lucene :: Analysis :: Standard :: Standardanalyzer (); # toma cadena tal como está (solo cuando usa Clucene-0.9.17 o superior) My $ Analyzer = New Lucene :: Analysis :: CAKEKANALYZER (); Crear un paquete analizador personalizado Myanalyzer; Use la base 'Lucene :: Analysis :: Analyzer'; # Debe llamar a Súper :: Nuevo si implementa nuevo () Sub nuevo {My $ Class = Shift; My $ Self = $ Class-> super :: New (); # ... devuelve $ yo; } Sub Tokenstream {My ($ Self, Field, $ lector) = @_; MIS $ RET = NUEVO LUCENO :: Análisis :: StandardTokenizer ($ lector); if ($ Field EQ "MyKeywordfield") {devuelve $ RAT; } $ ret = New Lucene :: Analysis :: WinCaseFilter ($ DER); $ ret = New Lucene :: Analysis :: StopFilter ($ DER, ); Devolver $ DER; } Paquete principal; My $ Analyzer = New Myanalyzer; Elija su tienda (Motor de almacenamiento) # almacenamiento en memoria My $ Store = New Lucene :: Tienda :: RamDirectory (); # almacenamiento basado en el disco My $ Store = Lucene :: Tienda :: FSDIRTORY-> GetDirectory ("/ Home / Lucene", 0); Abra y configure un EXTWORTER MY $ WREAR = NUEVO LUCENO :: Índice :: indexwriter ($ tienda , $ analizador, 0); # Configuración opcional para usuarios de energía $ Writer-> SetmerGeFactor (100); $ Writer-> SetUsecompoundFile (0); $ Writer-> SetMaxFieldLength (255); $ Writer-> SetMinMergedocs (10); $ Writer-> SetMaxMergedocs (100); Crear documentos y agregar campos My $ Doc = New Lucene :: Documento; # campo se analiza, indexado y almacenado $ doc-> Agregar (Lucene :: Document :: Field-> Texto ("Contenido", $ contenido)); # campo se indexede y almacenado $ doc-> Agregar (Lucene :: Document :: Field-> Palabra clave (ISBN ", $ ISBN)); # campo se acaba de almacenar $ doc-> Agregar (Lucene :: Document :: Field-> Unindexed ("Sales_Rank", $ Sales_Rank)); # campo se analiza e indexado $ doc-> Agregar (Lucene :: Document :: Field-> inestal ("Categorías", $ Categorías)); Requisitos: · Perl

Lucene Software relacionado