File Coverage

blib/lib/Geo/Location/IP/Role/Record/HasGeoNameId.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 9 9 100.0
pod 5 5 100.0
total 27 27 100.0


line stmt bran cond sub pod time code
1             package Geo::Location::IP::Role::Record::HasGeoNameId;
2              
3             # SPDX-License-Identifier: Artistic-1.0-Perl OR GPL-1.0-or-later
4              
5 17     17   251 use 5.026;
  17         55  
6 17     17   91 use warnings;
  17         28  
  17         876  
7 17     17   81 use utf8;
  17         51  
  17         97  
8              
9 17     17   513 use Object::Pad;
  17         31  
  17         101  
10              
11             role Geo::Location::IP::Role::Record::HasGeoNameId;
12              
13             our $VERSION = 0.005;
14              
15             field $geoname_id :param :reader = undef;
16              
17 12     12 1 55 1;
  12     12 1 67  
        8 1    
        8 1    
        8 1    
18             __END__