line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package WebService::HackerNews::Item; |
2
|
|
|
|
|
|
|
$WebService::HackerNews::Item::VERSION = '0.05'; |
3
|
1
|
|
|
1
|
|
4
|
use Moo; |
|
1
|
|
|
|
|
1
|
|
|
1
|
|
|
|
|
3
|
|
4
|
|
|
|
|
|
|
|
5
|
|
|
|
|
|
|
has id => (is => 'ro'); |
6
|
|
|
|
|
|
|
has deleted => (is => 'ro'); |
7
|
|
|
|
|
|
|
has type => (is => 'ro'); |
8
|
|
|
|
|
|
|
has by => (is => 'ro'); |
9
|
|
|
|
|
|
|
has time => (is => 'ro'); |
10
|
|
|
|
|
|
|
has text => (is => 'ro'); |
11
|
|
|
|
|
|
|
has dead => (is => 'ro'); |
12
|
|
|
|
|
|
|
has parent => (is => 'ro'); |
13
|
|
|
|
|
|
|
has kids => (is => 'ro'); |
14
|
|
|
|
|
|
|
has url => (is => 'ro'); |
15
|
|
|
|
|
|
|
has score => (is => 'ro'); |
16
|
|
|
|
|
|
|
has title => (is => 'ro'); |
17
|
|
|
|
|
|
|
has parts => (is => 'ro'); |
18
|
|
|
|
|
|
|
|
19
|
|
|
|
|
|
|
1; |
20
|
|
|
|
|
|
|
|
21
|
|
|
|
|
|
|
=head1 NAME |
22
|
|
|
|
|
|
|
|
23
|
|
|
|
|
|
|
WebService::HackerNews::Item - a HackerNews story, job, comment, poll or pollopt |
24
|
|
|
|
|
|
|
|
25
|
|
|
|
|
|
|
=head1 SYNOPSIS |
26
|
|
|
|
|
|
|
|
27
|
|
|
|
|
|
|
use WebService::HackerNews::Item; |
28
|
|
|
|
|
|
|
my $item = WebService::HackerNews::Item->new( |
29
|
|
|
|
|
|
|
id => 123, |
30
|
|
|
|
|
|
|
type => 'story', |
31
|
|
|
|
|
|
|
# more attributes |
32
|
|
|
|
|
|
|
); |
33
|
|
|
|
|
|
|
|
34
|
|
|
|
|
|
|
=head1 DESCRIPTION |
35
|
|
|
|
|
|
|
|
36
|
|
|
|
|
|
|
This module is a class for data objects returned by the C- method
|
37
|
|
|
|
|
|
|
of L. |
38
|
|
|
|
|
|
|
|
39
|
|
|
|
|
|
|
The objects have the following attributes, which are named after |
40
|
|
|
|
|
|
|
properties listed in the |
41
|
|
|
|
|
|
|
L- :
|
42
|
|
|
|
|
|
|
|
43
|
|
|
|
|
|
|
=over 4 |
44
|
|
|
|
|
|
|
|
45
|
|
|
|
|
|
|
=item * B - The item's unique id. Required. |
46
|
|
|
|
|
|
|
|
47
|
|
|
|
|
|
|
=item * B - true if the item is deleted. |
48
|
|
|
|
|
|
|
|
49
|
|
|
|
|
|
|
=item * B - The type of item. One of "job", "story", "comment", "poll", or "pollopt". |
50
|
|
|
|
|
|
|
|
51
|
|
|
|
|
|
|
=item * B - The username of the item's author. |
52
|
|
|
|
|
|
|
|
53
|
|
|
|
|
|
|
=item * B |
54
|
|
|
|
|
|
|
|
55
|
|
|
|
|
|
|
=item * B - The comment, Ask HN, or poll text. HTML. |
56
|
|
|
|
|
|
|
|
57
|
|
|
|
|
|
|
=item * B - true if the item is dead. |
58
|
|
|
|
|
|
|
|
59
|
|
|
|
|
|
|
=item * B - The item's parent. For comments, either another comment or the relevant story. For pollopts, the relevant poll. |
60
|
|
|
|
|
|
|
|
61
|
|
|
|
|
|
|
=item * B - The ids of the item's comments, in ranked display order. |
62
|
|
|
|
|
|
|
|
63
|
|
|
|
|
|
|
=item * B - The URL of the story. |
64
|
|
|
|
|
|
|
|
65
|
|
|
|
|
|
|
=item * B - The story's score, or the votes for a pollopt. |
66
|
|
|
|
|
|
|
|
67
|
|
|
|
|
|
|
=item * B - The title of the story or poll. |
68
|
|
|
|
|
|
|
|
69
|
|
|
|
|
|
|
=item * B - A list of related pollopts, in display order. |
70
|
|
|
|
|
|
|
|
71
|
|
|
|
|
|
|
=back |
72
|
|
|
|
|
|
|
|
73
|
|
|
|
|
|
|
=head1 SEE ALSO |
74
|
|
|
|
|
|
|
|
75
|
|
|
|
|
|
|
L |
76
|
|
|
|
|
|
|
|
77
|
|
|
|
|
|
|
=head1 REPOSITORY |
78
|
|
|
|
|
|
|
|
79
|
|
|
|
|
|
|
L |
80
|
|
|
|
|
|
|
|
81
|
|
|
|
|
|
|
=head1 AUTHOR |
82
|
|
|
|
|
|
|
|
83
|
|
|
|
|
|
|
Neil Bowers Eneilb@cpan.orgE |
84
|
|
|
|
|
|
|
|
85
|
|
|
|
|
|
|
=head1 COPYRIGHT AND LICENSE |
86
|
|
|
|
|
|
|
|
87
|
|
|
|
|
|
|
This software is copyright (c) 2014 by Neil Bowers . |
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
|
|
|
|
|
|
|
|