File Coverage

blib/lib/Games/Word/Phraselist/Proverb/KBBI.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 21 21 100.0


line stmt bran cond sub pod time code
1             package Games::Word::Phraselist::Proverb::KBBI;
2              
3             our $DATE = '2014-08-12'; # DATE
4             our $VERSION = '0.03'; # VERSION
5              
6 1     1   1133 use 5.010001;
  1         4  
  1         31  
7 1     1   5 use strict;
  1         1  
  1         21  
8 1     1   5 use warnings;
  1         2  
  1         20  
9              
10 1     1   1209 use parent qw(Games::Word::Phraselist);
  1         396  
  1         5  
11              
12             sub new {
13 1     1 1 1124 bless Games::Word::Phraselist->new ([map {chomp;$_} ]), shift;
  1713         1611  
  1713         2528  
14             }
15              
16             1;
17              
18             # ABSTRACT: Proverb phrases from Kamus Besar Bahasa Indonesia (Indonesian)
19              
20             =pod
21              
22             =encoding UTF-8
23              
24             =head1 NAME
25              
26             Games::Word::Phraselist::Proverb::KBBI - Proverb phrases from Kamus Besar Bahasa Indonesia (Indonesian)
27              
28             =head1 VERSION
29              
30             This document describes version 0.03 of Games::Word::Phraselist::Proverb::KBBI (from Perl distribution Games-Word-Phraselist-Proverb-KBBI), released on 2014-08-12.
31              
32             =head1 SYNOPSIS
33              
34             use Games::Word::Phraselist::Proverb::KBBI;
35             my $pl = Games::Word::Phraselist::Proverb::KBBI->new;
36             my $phrase = $pl->random_phrase;
37             print "We have a phrase." if $pl->is_phrase($phrase);
38              
39             =head1 DESCRIPTION
40              
41             C<< Games::Word::Phraselist::Proverb::KBBI >> subclasses L<<
42             Games::Word::Phraselist >>, giving you phrases of Indonesian proverbs from Kamus
43             Besar Bahasa Indonesia (currently the third edition, 2001).
44              
45             Because the data source is currently not fully cleansed (it is from earlier
46             effort: https://github.com/sharyanto/stardict ), I removed some entries.
47              
48             Some stats:
49              
50             Number of phrases: 1714
51             Shortest phrase length: 11 (including whitespace)
52             Longest phrase length: 104 (including whitespace)
53             Average phrase length: 31.2 characters (including whitespace)
54              
55             Since C<< Games::Word::Phraselist >> is subclassed, all its methods (except C<<
56             new >>) are available.
57              
58             Kamus Besar Bahasa Indonesia is the definitive Indonesian dictionary, published
59             by Pusat Bahasa.
60              
61             =head1 SEE ALSO
62              
63             L<< Games::Word::Phraselist >>.
64              
65             =head1 HOMEPAGE
66              
67             Please visit the project's homepage at L.
68              
69             =head1 SOURCE
70              
71             Source repository is at L.
72              
73             =head1 BUGS
74              
75             Please report any bugs or feature requests on the bugtracker website L
76              
77             When submitting a bug or request, please include a test-file or a
78             patch to an existing test-file that illustrates the bug or desired
79             feature.
80              
81             =head1 AUTHOR
82              
83             Steven Haryanto
84              
85             =head1 COPYRIGHT AND LICENSE
86              
87             This software is copyright (c) 2014 by Steven Haryanto.
88              
89             This is free software; you can redistribute it and/or modify it under
90             the same terms as the Perl 5 programming language system itself.
91              
92             =cut
93              
94             __DATA__