liblingua-stopwords-perl 0.09-1 / usr / share / perl5 / Lingua / StopWords / HU.pm

This file is indexed.

/usr/share/perl5/Lingua/StopWords/HU.pm is in liblingua-stopwords-perl 0.09-1.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below. 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
package Lingua::StopWords::HU;

use strict;
use warnings;

use Exporter;
our @ISA = qw(Exporter);

our %EXPORT_TAGS = ( 'all' => [ qw( getStopWords ) ] ); 
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
our $VERSION = 0.08;

sub getStopWords {
    if ( @_ and $_[0] eq 'UTF-8' ) {
        # adding U0 causes the result to be flagged as UTF-8
        my %stoplist = map { ( pack("U0a*", $_), 1 ) } qw( 
            a ahogy ahol aki akik akkor alatt által általában amely
            amelyek amelyekben amelyeket amelyet amelynek ami amit amolyan
            amíg amikor át abban ahhoz annak arra arról az azok azon azt
            azzal azért aztán azután azonban bár be belül benne cikk
            cikkek cikkeket csak de e eddig egész egy egyes egyetlen
            egyéb egyik egyre ekkor el elég ellen elõ elõször elõtt
            elsõ én éppen ebben ehhez emilyen ennek erre ez ezt ezek
            ezen ezzel ezért és fel felé hanem hiszen hogy hogyan igen
            így illetve ill. ill ilyen ilyenkor ison ismét itt jó jól
            jobban kell kellett keresztül keressünk ki kívül között
            közül legalább lehet lehetett legyen lenne lenni lesz lett
            maga magát majd majd már más másik meg még mellett mert
            mely melyek mi mit míg miért milyen mikor minden mindent
            mindenki mindig mint mintha mivel most nagy nagyobb nagyon ne
            néha nekem neki nem néhány nélkül nincs olyan ott össze
            õ õk õket pedig persze rá s saját sem semmi sok sokat
            sokkal számára szemben szerint szinte talán tehát teljes
            tovább továbbá több úgy ugyanis új újabb újra után
            utána utolsó vagy vagyis valaki valami valamint való vagyok
            van vannak volt voltam voltak voltunk vissza vele viszont volna 
        );
        return \%stoplist;
    }
    else {
        my %stoplist = map { ( $_, 1 ) } qw( 
            a ahogy ahol aki akik akkor alatt által általában amely amelyek
            amelyekben amelyeket amelyet amelynek ami amit amolyan amíg
            amikor át abban ahhoz annak arra arról az azok azon azt azzal
            azért aztán azután azonban bár be belül benne cikk cikkek
            cikkeket csak de e eddig egész egy egyes egyetlen egyéb egyik
            egyre ekkor el elég ellen elõ elõször elõtt elsõ én éppen ebben
            ehhez emilyen ennek erre ez ezt ezek ezen ezzel ezért és fel
            felé hanem hiszen hogy hogyan igen így illetve ill. ill ilyen
            ilyenkor ison ismét itt jó jól jobban kell kellett keresztül
            keressünk ki kívül között közül legalább lehet lehetett legyen
            lenne lenni lesz lett maga magát majd majd már más másik meg
            még mellett mert mely melyek mi mit míg miért milyen mikor
            minden mindent mindenki mindig mint mintha mivel most nagy
            nagyobb nagyon ne néha nekem neki nem néhány nélkül nincs olyan
            ott össze õ õk õket pedig persze rá s saját sem semmi sok sokat
            sokkal számára szemben szerint szinte talán tehát teljes tovább
            továbbá több úgy ugyanis új újabb újra után utána utolsó vagy
            vagyis valaki valami valamint való vagyok van vannak volt
            voltam voltak voltunk vissza vele viszont volna 
        );
        return \%stoplist;
    }
}

1;

APT Browse - Built by Thomas Orozco.