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   104837 use strict;
  8         47  
  8         215  
5 8     8   37 use warnings;
  8         12  
  8         210  
6 8     8   181 use 5.006;
  8         29  
7              
8             # Modules.
9 8     8   5672 use File::Share ':all';
  8         71659  
  8         1304  
10 8     8   7138 use Moo;
  8         124667  
  8         50  
11 8     8   19630 use namespace::clean;
  8         107822  
  8         38  
12              
13             # Version.
14             our $VERSION = 0.05;
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__