File Coverage

blib/lib/Test/Shared/Fixture/Wikibase/Datatype/Statement/Wikidata/SexOrGender/Male.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::SexOrGender::Male;
2              
3 6     6   346413 use base qw(Wikibase::Datatype::Statement);
  6         41  
  6         1690  
4 6     6   42 use strict;
  6         15  
  6         144  
5 6     6   31 use warnings;
  6         18  
  6         187  
6              
7 6     6   2922 use Test::Shared::Fixture::Wikibase::Datatype::Reference::Wikidata::ReferenceURL;
  6         24  
  6         228  
8 6     6   1495 use Test::Shared::Fixture::Wikibase::Datatype::Reference::Wikidata::VIAF;
  6         15  
  6         247  
9 6     6   2864 use Test::Shared::Fixture::Wikibase::Datatype::Snak::Wikidata::SexOrGender::Male;
  6         19  
  6         676  
10              
11             our $VERSION = 0.29;
12              
13             sub new {
14 2     2 1 133 my $class = shift;
15              
16 2         17 my @params = (
17             'snak' => Test::Shared::Fixture::Wikibase::Datatype::Snak::Wikidata::SexOrGender::Male->new,
18             'references' => [
19             Test::Shared::Fixture::Wikibase::Datatype::Reference::Wikidata::ReferenceURL->new,
20             Test::Shared::Fixture::Wikibase::Datatype::Reference::Wikidata::VIAF->new,
21             ],
22             );
23              
24 2         20 my $self = $class->SUPER::new(@params);
25              
26 2         36 return $self;
27             }
28              
29             1;
30              
31             __END__