File Coverage

lib/Spreadsheet/Engine/Function/T.pm
Criterion Covered Total %
statement 13 13 100.0
branch 2 2 100.0
condition n/a
subroutine 5 5 100.0
pod 2 2 100.0
total 22 22 100.0


line stmt bran cond sub pod time code
1             package Spreadsheet::Engine::Function::T;
2              
3 28     28   183 use strict;
  28         60  
  28         934  
4 28     28   175 use warnings;
  28         58  
  28         1884  
5              
6 28     28   159 use base 'Spreadsheet::Engine::Fn::base';
  28         58  
  28         4645  
7              
8 12     12 1 36 sub argument_count { 1 }
9              
10             sub result {
11 12     12 1 24 my $self = shift;
12 12         55 my $op = $self->next_operand;
13              
14 12 100       378 return Spreadsheet::Engine::Value->new(
15             type => 't',
16             value => $op->is_txt ? $op->value : ''
17             );
18             }
19              
20             1;
21              
22             __END__