File Coverage

blib/lib/Lingua/StopWords/RO.pm
Criterion Covered Total %
statement 23 23 100.0
branch 2 2 100.0
condition 2 3 66.6
subroutine 7 7 100.0
pod 0 1 0.0
total 34 36 94.4


line stmt bran cond sub pod time code
1             package Lingua::StopWords::RO;
2              
3 1     1   7 use strict;
  1         3  
  1         33  
4 1     1   4 use warnings;
  1         3  
  1         29  
5              
6 1     1   4 use utf8;
  1         2  
  1         5  
7              
8 1     1   27 use Encode qw(encode);
  1         3  
  1         46  
9              
10 1     1   5 use Exporter;
  1         3  
  1         397  
11             our @ISA = qw(Exporter);
12              
13             our %EXPORT_TAGS = ( 'all' => [ qw( getStopWords ) ] );
14             our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
15             our $VERSION = 0.11;
16              
17             sub getStopWords {
18 2 100 66 2 0 52 if ( @_ and $_[0] eq 'UTF-8' ) {
19 1         3 my %stoplist = map { ( $_, 1 ) } _stopwords();
  264         527  
20 1         22 return \%stoplist;
21             }
22             else {
23 1         5 my %stoplist = map { ( encode("iso-8859-2", $_), 1 ) } _stopwords();
  264         6600  
24 1         221 return \%stoplist;
25             }
26             }
27              
28             sub _stopwords {
29 2     2   47 return qw(
30             a abia acea aceasta această această aceea aceia acel acela acelaşi acelaşi
31             acele acelea aceluiaşi acest acesta aceste acestea acestei aceşti aceştia
32             acestor acestora acestui acolo acum adică ai aia aici al ăla alături ale
33             alt alta altă altceva alte altele altfel alţi alţii altul am anume apoi
34             ar are aş aşa asemenea asta astăzi astfel asupra atare atât atâta atâtea
35             atâţi atâţia aţi atît atîti atîţia atunci au avea avem avut azi ba bine
36             ca că cam când care căreia cărora căruia cât câtă câte câţi către ce cea
37             ceea cei ceilalţi cel cele celelalte celor ceva chiar ci cînd cine cineva
38             cît cîte cîteva cîţi cîţiva cu cui cum cumva da daca dacă dar de deasupra
39             decât deci decît deja deşi despre din dintr dintre doar după ea ei el ele
40             era este eu fără fecăreia fel fi fie fiecare fiecărui fiecăruia fiind foarte
41             fost i-au iar ieri îi îl îmi împotriva în în înainte înapoi înca încît însă
42             însă însuşi într între între îşi îţi l-am la le li lor lui mă mai mare mereu
43             mod mult multă multe mulţi ne nici niciodata nimeni nimic nişte noi noştri
44             noştri nostru nouă nu numai o oarecare oarece oarecine oarecui or orice
45             oricum până pe pentru peste pînă plus poată prea prin printr-o puţini s-ar
46             sa să să-i să-mi să-şi să-ţi săi sale sau său se şi sînt sîntem sînteţi spre
47             sub sunt suntem sunteţi te ţi toată toate tocmai tot toţi totul totuşi tu
48             tuturor un una unde unei unele uneori unii unor unui unul va vă voi vom vor
49             vreo vreun
50             );
51             }
52              
53             1;