/usr/share/perl5/Lingua/StopWords/FI.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 67 68 69 70 71 72 73 74 75 76 77 78 | package Lingua::StopWords::FI;
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(
olla olen olet on olemme olette ovat ole oli olisi olisit
olisin olisimme olisitte olisivat olit olin olimme olitte
olivat ollut olleet en et ei emme ette eivät minä minun minut
minua minussa minusta minuun minulla minulta minulle sinä
sinun sinut sinua sinussa sinusta sinuun sinulla sinulta
sinulle hän hänen hänet häntä hänessä hänestä häneen
hänellä häneltä hänelle me meidän meidät meitä meissä
meistä meihin meillä meiltä meille te teidän teidät teitä
teissä teistä teihin teillä teiltä teille he heidän
heidät heitä heissä heistä heihin heillä heiltä heille
tämä tämän tätä tässä tästä tähän tallä tältä
tälle tänä täksi tuo tuon tuotä tuossa tuosta tuohon
tuolla tuolta tuolle tuona tuoksi se sen sitä siinä siitä
siihen sillä siltä sille sinä siksi nämä näiden näitä
näissä näistä näihin näillä näiltä näille näinä
näiksi nuo noiden noita noissa noista noihin noilla noilta
noille noina noiksi ne niiden niitä niissä niistä niihin
niillä niiltä niille niinä niiksi kuka kenen kenet ketä
kenessä kenestä keneen kenellä keneltä kenelle kenenä
keneksi ketkä keiden ketkä keitä keissä keistä keihin
keillä keiltä keille keinä keiksi mikä minkä minkä mitä
missä mistä mihin millä miltä mille minä miksi mitkä joka
jonka jota jossa josta johon jolla jolta jolle jona joksi jotka
joiden joita joissa joista joihin joilla joilta joille joina
joiksi että ja jos koska kuin mutta niin sekä sillä tai vaan
vai vaikka kanssa mukaan noin poikki yli kun niin nyt itse
);
return \%stoplist;
}
else {
my %stoplist = map { ( $_, 1 ) } qw(
olla olen olet on olemme olette ovat ole oli olisi olisit
olisin olisimme olisitte olisivat olit olin olimme olitte
olivat ollut olleet en et ei emme ette eivät minä minun minut
minua minussa minusta minuun minulla minulta minulle sinä sinun
sinut sinua sinussa sinusta sinuun sinulla sinulta sinulle hän
hänen hänet häntä hänessä hänestä häneen hänellä häneltä
hänelle me meidän meidät meitä meissä meistä meihin meillä
meiltä meille te teidän teidät teitä teissä teistä teihin
teillä teiltä teille he heidän heidät heitä heissä heistä
heihin heillä heiltä heille tämä tämän tätä tässä tästä tähän
tallä tältä tälle tänä täksi tuo tuon tuotä tuossa tuosta
tuohon tuolla tuolta tuolle tuona tuoksi se sen sitä siinä
siitä siihen sillä siltä sille sinä siksi nämä näiden näitä
näissä näistä näihin näillä näiltä näille näinä näiksi nuo
noiden noita noissa noista noihin noilla noilta noille noina
noiksi ne niiden niitä niissä niistä niihin niillä niiltä
niille niinä niiksi kuka kenen kenet ketä kenessä kenestä
keneen kenellä keneltä kenelle kenenä keneksi ketkä keiden
ketkä keitä keissä keistä keihin keillä keiltä keille keinä
keiksi mikä minkä minkä mitä missä mistä mihin millä miltä
mille minä miksi mitkä joka jonka jota jossa josta johon jolla
jolta jolle jona joksi jotka joiden joita joissa joista joihin
joilla joilta joille joina joiksi että ja jos koska kuin mutta
niin sekä sillä tai vaan vai vaikka kanssa mukaan noin poikki
yli kun niin nyt itse
);
return \%stoplist;
}
}
1;
|