File Coverage

blib/lib/Map/Tube/Tbilisi.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1             package Map::Tube::Tbilisi;
2              
3             # Pragmas.
4 6     6   230420 use strict;
  6         9  
  6         236  
5 6     6   26 use warnings;
  6         7  
  6         175  
6 6     6   125 use 5.006;
  6         24  
  6         230  
7              
8             # Modules.
9 6     6   3025 use File::Share ':all';
  6         46980  
  6         1123  
10 6     6   3919 use Moo;
  6         76425  
  6         37  
11 6     6   11529 use namespace::clean;
  6         61320  
  6         36  
12              
13             # Version.
14             our $VERSION = 0.02;
15              
16             # Get XML.
17             has xml => (
18             'is' => 'ro',
19             'default' => sub {
20             return dist_file('Map-Tube-Tbilisi', 'tbilisi-map.xml');
21             },
22             );
23              
24             with 'Map::Tube';
25              
26             1;
27              
28             __END__