File Coverage

lib/Spreadsheet/Engine/Function/TIME.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 3 3 100.0
total 24 24 100.0


line stmt bran cond sub pod time code
1             package Spreadsheet::Engine::Function::TIME;
2              
3 28     28   146 use strict;
  28         63  
  28         945  
4 28     28   207 use warnings;
  28         63  
  28         763  
5              
6 28     28   152 use base 'Spreadsheet::Engine::Fn::math';
  28         52  
  28         5471  
7              
8 129     129 1 361 sub argument_count { 3 }
9 129     129 1 611 sub signature { 'n', 'n', 'n' }
10 129     129   449 sub _result_type_key { 'twoargnumeric' }
11              
12             sub calculate {
13 129     129 1 5027 my ($self, $H, $M, $S) = @_;
14 129         3234 return (($H * 60 * 60) + ($M * 60) + $S) / (24 * 60 * 60);
15             }
16              
17             1;
18              
19             __END__