File Coverage

blib/lib/Data/Cleaner/Float.pm
Criterion Covered Total %
statement 12 12 100.0
branch 2 2 100.0
condition n/a
subroutine 6 6 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package Data::Cleaner::Float;
2              
3 1     1   6 use strict;
  1         2  
  1         38  
4 1     1   5 use warnings;
  1         2  
  1         27  
5              
6 1     1   5 use Data::Types qw(is_float to_float);
  1         2  
  1         213  
7              
8             our $VERSION = 0.0.1;
9             our $DEFAULT = 0;
10              
11             sub _validate {
12 2 100   2   5 defined(is_float($_[1])) ? return 1 * $_[1] : return undef;
13             }
14              
15             sub _fix {
16 1     1   4 return $_[0]->get_default;
17             }
18              
19             sub _format {
20 1     1   3 return 1 * $_[1];
21             }
22              
23             1;
24              
25             __END__