File Coverage

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


line stmt bran cond sub pod time code
1 2     2   9 use Opendata::GTFS::Standard;
  2         3  
  2         15  
2 2     2   2573 use strict;
  2         4  
  2         59  
3 2     2   8 use warnings;
  2         2  
  2         61  
4              
5             # PODNAME: Opendata::GTFS::Type::CalendarDate
6             # ABSTRACT: Calendar date
7              
8 2     2   3025 class Opendata::GTFS::Type::CalendarDate using Moose {
  2     2   46  
  2     2   10  
  2         3  
  2         124  
  2         10  
  2         7  
  2         19  
  2         504  
  2         5  
  2         10  
  2         99  
  2         3  
  2         94  
  2         8  
  2         2  
  2         148  
  2         70  
  2         9  
  2         2  
  2         14  
  2         6205  
  2         3  
  2         14  
  2         10004  
  2         4  
  2         16  
  2         6142  
  2         4  
  2         18  
  2         128  
  2         3  
  2         15  
  2         367  
  2         5  
  2         19  
  2         1870  
  2         2  
  2         14  
  2         9080  
  2         5  
  2         85  
  2         7  
  2         3  
  2         60  
  2         9  
  2         3  
  2         95  
  2         8  
  2         2  
  2         256  
  2         15  
  2         27580  
  2         37  
  2         3706  
9              
10 2         24 our $VERSION = '0.0104'; # VERSION
11              
12 2         5 my @columns = qw/
13             1 service_id
14             1 date
15             1 exception_type
16             /;
17              
18 2         9 for (my $i = 0; $i < $#columns; $i += 2) {
19 6         8526 my $required = $columns[$i];
20 6         11 my $column = $columns[$i + 1];
21              
22 6 50       22 has $column => (
23             is => 'ro',
24             isa => ($required ? Str : Maybe[Str]),
25             );
26             }
27             }
28              
29             1;
30              
31             __END__
32              
33             =pod
34              
35             =encoding utf-8
36              
37             =head1 NAME
38              
39             Opendata::GTFS::Type::CalendarDate - Calendar date
40              
41             =head1 VERSION
42              
43             Version 0.0104, released 2015-02-22.
44              
45              
46              
47             =head1 ATTRIBUTES
48              
49              
50             =head2 date
51              
52             =begin HTML
53              
54             <table cellpadding="0" cellspacing="0">
55             <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>
56              
57             </td>
58             <td style="padding-right: 6px; padding-left: 6px; border-right: 1px solid #b8b8b8; white-space: nowrap;">optional</td>
59             <td style="padding-left: 6px; padding-right: 6px; white-space: nowrap;">read-only</td></tr>
60             </table>
61              
62             <p></p>
63              
64             =end HTML
65              
66             =head2 exception_type
67              
68             =begin HTML
69              
70             <table cellpadding="0" cellspacing="0">
71             <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>
72              
73             </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 service_id
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             =head1 SOURCE
99              
100             L<https://github.com/Csson/p5-Opendata-GTFS-Feed>
101              
102             =head1 HOMEPAGE
103              
104             L<https://metacpan.org/release/Opendata-GTFS-Feed>
105              
106             =head1 AUTHOR
107              
108             Erik Carlsson <info@code301.com>
109              
110             =head1 COPYRIGHT AND LICENSE
111              
112             This software is copyright (c) 2015 by Erik Carlsson <info@code301.com>.
113              
114             This is free software; you can redistribute it and/or modify it under
115             the same terms as the Perl 5 programming language system itself.
116              
117             =cut