File Coverage

blib/lib/Test/Shared/Fixture/Wikibase/Datatype/Statement/Wikidata/InstanceOf/VersionEditionOrTranslation.pm
Criterion Covered Total %
statement 22 22 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 1 1 100.0
total 30 30 100.0


line stmt bran cond sub pod time code
1             package Test::Shared::Fixture::Wikibase::Datatype::Statement::Wikidata::InstanceOf::VersionEditionOrTranslation;
2              
3 3     3   350828 use base qw(Wikibase::Datatype::Statement);
  3         42  
  3         1400  
4 3     3   26 use strict;
  3         7  
  3         83  
5 3     3   17 use warnings;
  3         10  
  3         82  
6              
7 3     3   1627 use Test::Shared::Fixture::Wikibase::Datatype::Reference::Wikidata::VIAF;
  3         12  
  3         124  
8 3     3   1542 use Test::Shared::Fixture::Wikibase::Datatype::Snak::Wikidata::InstanceOf::VersionEditionOrTranslation;
  3         17  
  3         102  
9 3     3   1397 use Test::Shared::Fixture::Wikibase::Datatype::Snak::Wikidata::Of::Poem;
  3         8  
  3         394  
10              
11             our $VERSION = 0.30;
12              
13             sub new {
14 1     1 1 141 my $class = shift;
15              
16 1         12 my @params = (
17             'snak' => Test::Shared::Fixture::Wikibase::Datatype::Snak::Wikidata::InstanceOf::VersionEditionOrTranslation->new,
18             'property_snaks' => [
19             Test::Shared::Fixture::Wikibase::Datatype::Snak::Wikidata::Of::Poem->new,
20             ],
21             'references' => [
22             Test::Shared::Fixture::Wikibase::Datatype::Reference::Wikidata::VIAF->new,
23             ],
24             );
25              
26 1         8 my $self = $class->SUPER::new(@params);
27              
28 1         14 return $self;
29             }
30              
31             1;
32              
33             __END__
34              
35             =pod
36              
37             =encoding utf8
38              
39             =head1 NAME
40              
41             Test::Shared::Fixture::Wikibase::Datatype::Statement::Wikidata::InstanceOf::VersionEditionOrTranslation - Test instance for Wikidata statement.
42              
43             =head1 SYNOPSIS
44              
45             use Test::Shared::Fixture::Wikibase::Datatype::Statement::Wikidata::InstanceOf::VersionEditionOrTranslation;
46              
47             my $obj = Test::Shared::Fixture::Wikibase::Datatype::Statement::Wikidata::InstanceOf::VersionEditionOrTranslation->new(%params);
48             my $id = $obj->id;
49             my $property_snaks_ar = $obj->property_snaks;
50             my $rank = $obj->rank;
51             my $referenes_ar = $obj->references;
52             my $snak = $obj->snak;
53              
54             =head1 METHODS
55              
56             =head2 C<new>
57              
58             my $obj = Test::Shared::Fixture::Wikibase::Datatype::Statement::Wikidata::InstanceOf::VersionEditionOrTranslation->new(%params);
59              
60             Constructor.
61              
62             Returns instance of object.
63              
64             =head2 C<id>
65              
66             my $id = $obj->id;
67              
68             Get id of statement.
69              
70             Returns string.
71              
72             =head2 C<property_snaks>
73              
74             my $property_snaks_ar = $obj->property_snaks;
75              
76             Get property snaks.
77              
78             Returns reference to array with Wikibase::Datatype::Snak instances.
79              
80             =head2 C<rank>
81              
82             my $rank = $obj->rank;
83              
84             Get rank value.
85              
86             =head2 C<references>
87              
88             my $referenes_ar = $obj->references;
89              
90             Get references.
91              
92             Returns reference to array with Wikibase::Datatype::Reference instance.
93              
94             =head2 C<snak>
95              
96             my $snak = $obj->snak;
97              
98             Get main snak.
99              
100             Returns Wikibase::Datatype::Snak instance.
101              
102             =head1 EXAMPLE
103              
104             =for comment filename=fixture_create_and_print_statement_wd_instance_of_version_edition_or_translation.pl
105              
106             use strict;
107             use warnings;
108              
109             use Test::Shared::Fixture::Wikibase::Datatype::Statement::Wikidata::InstanceOf::VersionEditionOrTranslation;
110             use Wikibase::Datatype::Print::Statement;
111              
112             # Object.
113             my $obj = Test::Shared::Fixture::Wikibase::Datatype::Statement::Wikidata::InstanceOf::VersionEditionOrTranslation->new;
114              
115             # Print out.
116             print scalar Wikibase::Datatype::Print::Statement::print($obj);
117              
118             # Output:
119             # P31: Q3331189 (normal)
120             # P642: Q5185279
121             # References:
122             # {
123             # P248: Q53919
124             # P214: 113230702
125             # P813: 7 December 2013 (Q1985727)
126             # }
127              
128             =head1 DEPENDENCIES
129              
130             L<Test::Shared::Fixture::Wikibase::Datatype::Reference::Wikidata::VIAF>,
131             L<Test::Shared::Fixture::Wikibase::Datatype::Snak::Wikidata::InstanceOf::VersionEditionOrTranslation>,
132             L<Test::Shared::Fixture::Wikibase::Datatype::Snak::Wikidata::Of::Poem>,
133             L<Wikibase::Datatype::Statement>.
134              
135             =head1 SEE ALSO
136              
137             =over
138              
139             =item L<Wikibase::Datatype>
140              
141             Wikibase datatypes.
142              
143             =item L<Wikibase::Datatype::Statement>
144              
145             Wikibase statement datatype.
146              
147             =back
148              
149             =head1 REPOSITORY
150              
151             L<https://github.com/michal-josef-spacek/Wikibase-Datatype>
152              
153             =head1 AUTHOR
154              
155             Michal Josef Špaček L<mailto:skim@cpan.org>
156              
157             L<http://skim.cz>
158              
159             =head1 LICENSE AND COPYRIGHT
160              
161             © 2020-2023 Michal Josef Špaček
162              
163             BSD 2-Clause License
164              
165             =head1 VERSION
166              
167             0.30
168              
169             =cut