File Coverage

blib/lib/Map/Metro/Graph/Connection.pm
Criterion Covered Total %
statement 68 68 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 74 74 100.0


line stmt bran cond sub pod time code
1 1     1   7 use Map::Metro::Standard::Moops;
  1         2  
  1         10  
2 1     1   2405 use strict;
  1         3  
  1         26  
3 1     1   6 use warnings;
  1         2  
  1         61  
4              
5             our $VERSION = '0.2300'; # VERSION
6             # PODNAME: Map::Metro::Graph::Connection
7             # ABSTRACT: Connects two stations on a line
8              
9 1     1   1643 class Map::Metro::Graph::Connection {
  1     1   67  
  1     1   6  
  1         3  
  1         67  
  1         5  
  1         2  
  1         9  
  1         276  
  1         2  
  1         9  
  1         61  
  1         2  
  1         51  
  1         5  
  1         1  
  1         101  
  1         41  
  1         5  
  1         2  
  1         8  
  1         4115  
  1         2  
  1         10  
  1         6462  
  1         3  
  1         10  
  1         4495  
  1         2  
  1         14  
  1         79  
  1         2  
  1         10  
  1         214  
  1         2  
  1         9  
  1         1296  
  1         2  
  1         9  
  1         6214  
  1         4  
  1         27  
  1         2  
  1         29  
  1         6  
  1         7  
  1         52  
  1         6  
  1         2  
  1         155  
  1         9  
  1         19506  
  1         20  
  1         4261  
10              
11 1         16 has origin_line_station => (
12             is => 'ro',
13             isa => LineStation,
14             required => 1,
15             );
16 1         4706 has destination_line_station => (
17             is => 'ro',
18             isa => LineStation,
19             required => 1,
20             );
21 1         4277 has previous_connection => (
22             is => 'rw',
23             isa => Maybe[ Connection ],
24             predicate => 1,
25             );
26 1         6734 has next_connection => (
27             is => 'rw',
28             isa => Maybe[ Connection ],
29             predicate => 1,
30             );
31 1         6076 has weight => (
32             is => 'ro',
33             isa => Int,
34             required => 1,
35             default => 1,
36             );
37             }
38              
39             1;
40              
41             __END__
42              
43             =pod
44              
45             =encoding UTF-8
46              
47             =head1 NAME
48              
49             Map::Metro::Graph::Connection - Connects two stations on a line
50              
51             =head1 VERSION
52              
53             Version 0.2300, released 2016-01-14.
54              
55             =head1 DESCRIPTION
56              
57             Connections represent the combination of two specific L<LineStations|Map::Metro::Graph::LineStation>, and the 'cost' of
58             travelling between them.
59              
60             In L<Graph> terms, a connection is a weighted edge.
61              
62             =head1 SOURCE
63              
64             L<https://github.com/Csson/p5-Map-Metro>
65              
66             =head1 HOMEPAGE
67              
68             L<https://metacpan.org/release/Map-Metro>
69              
70             =head1 AUTHOR
71              
72             Erik Carlsson <info@code301.com>
73              
74             =head1 COPYRIGHT AND LICENSE
75              
76             This software is copyright (c) 2016 by Erik Carlsson.
77              
78             This is free software; you can redistribute it and/or modify it under
79             the same terms as the Perl 5 programming language system itself.
80              
81             =cut