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   104012 use strict;
  8         16  
  8         188  
5 8     8   39 use warnings;
  8         11  
  8         175  
6 8     8   217 use 5.006;
  8         29  
7              
8             # Modules.
9 8     8   5655 use File::Share ':all';
  8         71256  
  8         1370  
10 8     8   8697 use Moo;
  8         128753  
  8         50  
11 8     8   20739 use namespace::clean;
  8         108092  
  8         53  
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-SaintPetersburg', 'saint_petersburg-map.xml');
21             },
22             );
23              
24             with 'Map::Tube';
25              
26             1;
27              
28             __END__