File Coverage

blib/lib/Opendata/GTFS/Type/Frequency.pm
Criterion Covered Total %
statement 70 70 100.0
branch 2 2 100.0
condition n/a
subroutine 6 6 100.0
pod n/a
total 78 78 100.0


line stmt bran cond sub pod time code
1 2     2   9 use Opendata::GTFS::Standard;
  2         3  
  2         15  
2 2     2   2473 use strict;
  2         3  
  2         52  
3 2     2   8 use warnings;
  2         3  
  2         63  
4              
5             # PODNAME: Opendata::GTFS::Type::Frequency
6             # ABSTRACT: Frequency
7              
8 2     2   2858 class Opendata::GTFS::Type::Frequency using Moose {
  2     2   50  
  2     2   9  
  2         2  
  2         128  
  2         10  
  2         2  
  2         18  
  2         541  
  2         4  
  2         12  
  2         105  
  2         3  
  2         96  
  2         9  
  2         3  
  2         156  
  2         77  
  2         10  
  2         3  
  2         13  
  2         6184  
  2         4  
  2         14  
  2         9964  
  2         4  
  2         17  
  2         6249  
  2         4  
  2         21  
  2         137  
  2         3  
  2         20  
  2         390  
  2         4  
  2         16  
  2         1883  
  2         4  
  2         14  
  2         10072  
  2         5  
  2         64  
  2         11  
  2         2  
  2         70  
  2         8  
  2         3  
  2         97  
  2         7  
  2         2  
  2         265  
  2         17  
  2         27514  
  2         35  
  2         3585  
9              
10 2         25 our $VERSION = '0.0102'; # VERSION
11              
12 2         5 my @columns = qw/
13             1 trip_id
14             1 start_time
15             1 end_time
16             1 headway_secs
17             0 exact_times
18             /;
19              
20 2         9 for (my $i = 0; $i < $#columns; $i += 2) {
21 10         14108 my $required = $columns[$i];
22 10         14 my $column = $columns[$i + 1];
23              
24 10 100       32 has $column => (
25             is => 'ro',
26             isa => ($required ? Str : Maybe[Str]),
27             );
28             }
29             }
30              
31             1;
32              
33             __END__
34              
35             =pod
36              
37             =encoding utf-8
38              
39             =head1 NAME
40              
41             Opendata::GTFS::Type::Frequency - Frequency
42              
43             =head1 VERSION
44              
45             Version 0.0102, released 2015-02-19.
46              
47              
48              
49             =head1 ATTRIBUTES
50              
51              
52             =head2 end_time
53              
54             =begin HTML
55              
56             <table cellpadding="0" cellspacing="0">
57             <tr><td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;"><a href="https://metacpan.org/pod/Types::Standard#Str">Str</a>
58              
59             </td>
60             <td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;">optional</td>
61             <td style="padding-left: 6px; padding-right: 6px; white-space: nowrap;">read-only</td></tr>
62             </table>
63              
64             <p></p>
65              
66             =end HTML
67              
68             =head2 exact_times
69              
70             =begin HTML
71              
72             <table cellpadding="0" cellspacing="0">
73             <tr><td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;"><a href="https://metacpan.org/pod/Types::Standard#Maybe">Maybe</a> [ <a href="https://metacpan.org/pod/Types::Standard#Str">Str</a> ]</td>
74             <td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;">optional</td>
75             <td style="padding-left: 6px; padding-right: 6px; white-space: nowrap;">read-only</td></tr>
76             </table>
77              
78             <p></p>
79              
80             =end HTML
81              
82             =head2 headway_secs
83              
84             =begin HTML
85              
86             <table cellpadding="0" cellspacing="0">
87             <tr><td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;"><a href="https://metacpan.org/pod/Types::Standard#Str">Str</a>
88              
89             </td>
90             <td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;">optional</td>
91             <td style="padding-left: 6px; padding-right: 6px; white-space: nowrap;">read-only</td></tr>
92             </table>
93              
94             <p></p>
95              
96             =end HTML
97              
98             =head2 start_time
99              
100             =begin HTML
101              
102             <table cellpadding="0" cellspacing="0">
103             <tr><td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;"><a href="https://metacpan.org/pod/Types::Standard#Str">Str</a>
104              
105             </td>
106             <td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;">optional</td>
107             <td style="padding-left: 6px; padding-right: 6px; white-space: nowrap;">read-only</td></tr>
108             </table>
109              
110             <p></p>
111              
112             =end HTML
113              
114             =head2 trip_id
115              
116             =begin HTML
117              
118             <table cellpadding="0" cellspacing="0">
119             <tr><td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;"><a href="https://metacpan.org/pod/Types::Standard#Str">Str</a>
120              
121             </td>
122             <td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;">optional</td>
123             <td style="padding-left: 6px; padding-right: 6px; white-space: nowrap;">read-only</td></tr>
124             </table>
125              
126             <p></p>
127              
128             =end HTML
129              
130             =head1 SOURCE
131              
132             L<https://github.com/Csson/p5-Opendata-GTFS-Feed>
133              
134             =head1 HOMEPAGE
135              
136             L<https://metacpan.org/release/Opendata-GTFS-Feed>
137              
138             =head1 AUTHOR
139              
140             Erik Carlsson <info@code301.com>
141              
142             =head1 COPYRIGHT AND LICENSE
143              
144             This software is copyright (c) 2015 by Erik Carlsson <info@code301.com>.
145              
146             This is free software; you can redistribute it and/or modify it under
147             the same terms as the Perl 5 programming language system itself.
148              
149             =cut