File Coverage

blib/lib/TableData/Lingua/Word/EN/ByClass/Adjective/TalkEnglish.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package TableData::Lingua::Word::EN::ByClass::Adjective::TalkEnglish;
2              
3 1     1   488159 use strict;
  1         3  
  1         40  
4              
5 1     1   608 use Role::Tiny::With;
  1         7752  
  1         148  
6             with 'TableDataRole::Source::CSVInDATA';
7              
8             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
9             our $DATE = '2025-01-13'; # DATE
10             our $DIST = 'TableDataBundle-Lingua-Word-EN-ByClass-Adjective'; # DIST
11             our $VERSION = '0.004'; # VERSION
12              
13             our %STATS = ("num_rows",143,"num_columns",2); # STATS
14              
15             1;
16             # ABSTRACT: List of words that are used as adjectives only, from talkenglish.com
17              
18             =pod
19              
20             =encoding UTF-8
21              
22             =head1 NAME
23              
24             TableData::Lingua::Word::EN::ByClass::Adjective::TalkEnglish - List of words that are used as adjectives only, from talkenglish.com
25              
26             =head1 VERSION
27              
28             This document describes version 0.004 of TableData::Lingua::Word::EN::ByClass::Adjective::TalkEnglish (from Perl distribution TableDataBundle-Lingua-Word-EN-ByClass-Adjective), released on 2025-01-13.
29              
30             =head1 SYNOPSIS
31              
32             To use from Perl code:
33              
34             use TableData::Lingua::Word::EN::ByClass::Adjective::TalkEnglish;
35              
36             my $td = TableData::Lingua::Word::EN::ByClass::Adjective::TalkEnglish->new;
37              
38             # Iterate rows of the table
39             $td->each_row_arrayref(sub { my $row = shift; ... });
40             $td->each_row_hashref (sub { my $row = shift; ... });
41              
42             # Get the list of column names
43             my @columns = $td->get_column_names;
44              
45             # Get the number of rows
46             my $row_count = $td->get_row_count;
47              
48             See also L for other methods.
49              
50             To use from command-line (using L CLI):
51              
52             # Display as ASCII table and view with pager
53             % tabledata Lingua::Word::EN::ByClass::Adjective::TalkEnglish --page
54              
55             # Get number of rows
56             % tabledata --action count_rows Lingua::Word::EN::ByClass::Adjective::TalkEnglish
57              
58             See the L CLI's documentation for other available actions and options.
59              
60             =head1 TABLEDATA STATISTICS
61              
62             +-------------+-------+
63             | key | value |
64             +-------------+-------+
65             | num_columns | 2 |
66             | num_rows | 143 |
67             +-------------+-------+
68              
69             The statistics is available in the C<%STATS> package variable.
70              
71             =head1 HOMEPAGE
72              
73             Please visit the project's homepage at L.
74              
75             =head1 SOURCE
76              
77             Source repository is at L.
78              
79             =head1 SEE ALSO
80              
81             L
82              
83             L,
84             L
85              
86             Other C modules.
87              
88             L
89              
90             =head1 AUTHOR
91              
92             perlancar
93              
94             =head1 CONTRIBUTING
95              
96              
97             To contribute, you can send patches by email/via RT, or send pull requests on
98             GitHub.
99              
100             Most of the time, you don't need to build the distribution yourself. You can
101             simply modify the code, then test via:
102              
103             % prove -l
104              
105             If you want to build the distribution (e.g. to try to install it locally on your
106             system), you can install L,
107             L,
108             L, and sometimes one or two other
109             Dist::Zilla- and/or Pod::Weaver plugins. Any additional steps required beyond
110             that are considered a bug and can be reported to me.
111              
112             =head1 COPYRIGHT AND LICENSE
113              
114             This software is copyright (c) 2025 by perlancar .
115              
116             This is free software; you can redistribute it and/or modify it under
117             the same terms as the Perl 5 programming language system itself.
118              
119             =head1 BUGS
120              
121             Please report any bugs or feature requests on the bugtracker website L
122              
123             When submitting a bug or request, please include a test-file or a
124             patch to an existing test-file that illustrates the bug or desired
125             feature.
126              
127             =cut
128              
129             __DATA__