| blib/lib/WordList/EN/ByClass/Noun/TalkEnglish.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| statement | 12 | 20 | 60.0 |
| branch | n/a | ||
| condition | n/a | ||
| subroutine | 4 | 6 | 66.6 |
| pod | n/a | ||
| total | 16 | 26 | 61.5 |
| line | stmt | bran | cond | sub | pod | time | code |
|---|---|---|---|---|---|---|---|
| 1 | package WordList::EN::ByClass::Noun::TalkEnglish; | ||||||
| 2 | |||||||
| 3 | 1 | 1 | 408270 | use strict; | |||
| 1 | 2 | ||||||
| 1 | 48 | ||||||
| 4 | 1 | 1 | 7 | use warnings; | |||
| 1 | 2 | ||||||
| 1 | 79 | ||||||
| 5 | 1 | 1 | 7064 | use WordList; | |||
| 1 | 2113 | ||||||
| 1 | 89 | ||||||
| 6 | |||||||
| 7 | our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY | ||||||
| 8 | our $DATE = '2025-01-13'; # DATE | ||||||
| 9 | our $DIST = 'WordListBundle-EN-ByClass-Noun'; # DIST | ||||||
| 10 | our $VERSION = '0.005'; # VERSION | ||||||
| 11 | |||||||
| 12 | our @ISA = qw(WordList); | ||||||
| 13 | |||||||
| 14 | 1 | 1 | 4586 | use Role::Tiny::With; | |||
| 1 | 12334 | ||||||
| 1 | 233 | ||||||
| 15 | with 'WordListRole::FromArray'; | ||||||
| 16 | |||||||
| 17 | sub _array { | ||||||
| 18 | 0 | 0 | require TableData::Lingua::Word::EN::ByClass::Noun::TalkEnglish; | ||||
| 19 | |||||||
| 20 | 0 | my $t = TableData::Lingua::Word::EN::ByClass::Noun::TalkEnglish->new; | |||||
| 21 | 0 | my $ary = []; | |||||
| 22 | $t->each_row_arrayref( | ||||||
| 23 | sub { | ||||||
| 24 | 0 | 0 | my $row = shift; | ||||
| 25 | 0 | push @$ary, $row->[0]; | |||||
| 26 | 0 | 1; | |||||
| 27 | } | ||||||
| 28 | 0 | ); | |||||
| 29 | 0 | $ary; | |||||
| 30 | } | ||||||
| 31 | |||||||
| 32 | our $DYNAMIC = 1; | ||||||
| 33 | our $SORT = 'custom'; | ||||||
| 34 | |||||||
| 35 | our %STATS = ("num_words_contains_whitespace",0,"num_words_contain_nonword_chars",0,"num_words_contain_whitespace",0,"num_words",484,"shortest_word_len",2,"longest_word_len",14,"num_words_contain_unicode",0,"num_words_contains_unicode",0,"num_words_contains_nonword_chars",0,"avg_word_len",7.37809917355372); # STATS | ||||||
| 36 | |||||||
| 37 | 1; | ||||||
| 38 | # ABSTRACT: Words that are used as nouns only, from talkenglish.com | ||||||
| 39 | |||||||
| 40 | __END__ |