File Coverage

blib/lib/Map/Tube/Warsaw.pm
Criterion Covered Total %
statement 17 17 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 23 23 100.0


line stmt bran cond sub pod time code
1             package Map::Tube::Warsaw;
2              
3             # Pragmas.
4 8     8   105373 use strict;
  8         18  
  8         238  
5 8     8   45 use warnings;
  8         12  
  8         205  
6 8     8   173 use 5.006;
  8         31  
7              
8             # Modules.
9 8     8   6137 use File::Share ':all';
  8         73076  
  8         1323  
10 8     8   7195 use Moo;
  8         126540  
  8         48  
11 8     8   20216 use namespace::clean;
  8         106106  
  8         38  
12              
13             # Version.
14             our $VERSION = 0.06;
15              
16             # Get XML.
17             has xml => (
18             'is' => 'ro',
19             'default' => sub {
20             return dist_file('Map-Tube-Warsaw', 'warsaw-map.xml');
21             },
22             );
23              
24             with 'Map::Tube';
25              
26             1;
27              
28             __END__