File Coverage

blib/lib/Map/Tube/SaintPetersburg.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::SaintPetersburg;
2              
3             # Pragmas.
4 8     8   100568 use strict;
  8         18  
  8         197  
5 8     8   38 use warnings;
  8         17  
  8         210  
6 8     8   175 use 5.006;
  8         27  
7              
8             # Modules.
9 8     8   5778 use File::Share ':all';
  8         70420  
  8         1439  
10 8     8   7317 use Moo;
  8         131210  
  8         48  
11 8     8   20352 use namespace::clean;
  8         108297  
  8         37  
12              
13             # Version.
14             our $VERSION = 0.04;
15              
16             # Get XML.
17             has xml => (
18             'is' => 'ro',
19             'default' => sub {
20             return dist_file('Map-Tube-SaintPetersburg', 'saint_petersburg-map.xml');
21             },
22             );
23              
24             with 'Map::Tube';
25              
26             1;
27              
28             __END__