Luceen Lucene is een PERL-API naar de C-poort van de Lucene zoekmachine.
Download nu

Luceen Rangschikking & Samenvatting

Luceen Tags

zoekmachine Perl-module haven Luceen Lucene C-poort

Luceen Beschrijving

Lucene is een Perl-api naar de C-haven van de Lucene-zoekmachine. Lucene is een Perl API naar de C-poort van de Lucene Search Engine.Synopsisinitialize / Lege Lucene Index Mijn $ Analyzer = Nieuwe Lucene :: Analyse :: Standard :: Standardanalyzer (); Mijn $ Store = Lucene :: Winkel :: FSDirectory-> GetDirectory ("/ Home / Lucene", 1); Mijn $ TMP_Writer = Nieuwe Lucene :: Index :: Indexwriter ($ Store, $ Analyzer, 1); $ TMP_Writer-> Sluiten; UndeD-$ TMP_Writer; Kies uw analysator (string-tokenizer) # Looking Cases-tekst en splitst het bij niet-lettertekens Mijn $ Analyzer = Nieuwe Lucene :: Analyse :: SimplEanalyzer (); # hetzelfde als voor en verwijdert stopwoorden My $ Analyzer = New Lucene :: Analyse :: stopanalyzer (); # hetzelfde als voorheen, maar je geeft je eigen stopwoorden mijn $ analyzer = nieuwe Lucene :: Analyse :: stopanalyzer (); # splitst tekst bij witruimtekarakters Mijn $ analyzer = nieuw Lucene :: Analyse :: WhiteSpaceAanalyzer (); # Looking Cases-tekst, Tokensized IT gebaseerd op een Grammer die # verlaat genaamd autoriteiten intact (e-mails, bedrijfsnamen, # webhostnamen, IP-adressen, enz.) En verwijderde stopwoorden Mijn $ Analyzer = Nieuwe Lucene :: Analyse :: Standaard: : Standardanalyzer (); # hetzelfde als voorheen, maar u geeft uw eigen stopwoorden Mijn $ Analyzer = New Lucene :: Analyse :: Standard :: Standardanalyzer (; # Duurt string zoals het is (alleen bij gebruik van Clucene-0.9.17 of hoger) Mijn $ Analyzer = Nieuwe Lucene :: Analyse :: Keywordsanalyzer (); Creëer een aangepaste analyzer-pakket Myanalyzer; Gebruik basis 'Lucene :: Analyse :: Analyzer'; # Je moet super :: nieuw noemen als je nieuwe () sub nieuwe {mijn $ class = shift implementeert; mijn $ self = $ class-> super :: nieuw (); # ... return $ self; } SUB TOKENSSTREAM {mijn ($ self, $ field, $ lezer) = @_; Mijn $ RET = Nieuwe Lucene :: Analyse :: StandardTokenizer ($ lezer); if ($ field eq "mykeywordfield") {return $ ret; } $ RET = NIEUW LUCENE :: Analyse :: LowerCaseFilter ($ RET); $ RET = NIEUW LUCENE :: ANALYSE :: STOPFILTER ($ RET, ); retourneer $ RET; } Pakketnaam; Mijn $ Analyzer = Nieuwe Myanalyzer; Kies je winkel (opslagmotor) # In-Memory Storage My $ Store = New Lucene :: Winkel :: Ramdirectory (); # Disk-gebaseerde opslag My $ Store = Lucene :: Winkel :: FSDirectory-> GetDirectory ("/ Home / Lucene", 0); Open een Indexwriter My $ Writer = New Lucene :: Index :: Indexwriter ($ Winkel , $ Analyzer, 0); # Optionele instellingen voor voedingsgebruikers $ Writer-> Setmergerfactor (100); $ Writer-> SetuseCompoundFile (0); $ Writer-> SetMaxfieldLength (255); $ Writer-> SetMinMergedocs (10); $ Writer-> SetMaxMergedocs (100); Documenten maken en velden toevoegen Mijn $ DOC = Nieuw Lucene :: Document; # Veld wordt geanalyseerd, geïndexeerd en opgeslagen $ doc-> add (Lucene :: Document :: Field-> Tekst ("Inhoud", $ Inhoud)); # Veld wordt geïndexeerd en opgeslagen $ doc-> add (Lucene :: document :: veld-> trefwoord ("ISBN", $ ISBN)); # Field krijgt zojuist opgeslagen $ doc-> add (Lucene :: Document :: Veld-> Unindexed ("Sales_rank", $ Sales_rank)); # Veld wordt geanalyseerd en geïndexeerd $ doc-> add (Lucene :: Document :: Field-> Unstored ("Categorieën", $ Categorieën)); Vereisten: · Perl

Luceen Gerelateerde software