File Coverage

blib/lib/Form/Processor/Field/Hour.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 2 0.0
total 16 18 88.8


line stmt bran cond sub pod time code
1             package Form::Processor::Field::Hour;
2             $Form::Processor::Field::Hour::VERSION = '1.162360';
3 2     2   828 use strict;
  2         3  
  2         54  
4 2     2   7 use warnings;
  2         2  
  2         41  
5 2     2   7 use base 'Form::Processor::Field::Minute';
  2         2  
  2         691  
6              
7              
8              
9 1     1 0 6 sub init_range_start { return 0 }
10 1     1 0 4 sub init_range_end { return 23 }
11              
12             # ABSTRACT: accept integer from 0 to 23
13              
14              
15              
16              
17             1;
18              
19             __END__