Branch Coverage

blib/lib/Number/Tolerant/Type/less_than.pm
Criterion Covered Total %
branch 10 10 100.0


line true false branch
16 1 22 if $string =~ /\A$X?<\s*($number)\z/
17 1 21 if $string =~ /\A($number)\s*>$X\z/
19 1 20 if $string =~ /\Aless\s+than\s+($number)\z/
28 46 24 unless 2 == grep({defined $_;} @_)
31 9 35 if ($_[$i->[0]] eq "less_than" and defined(my $num = $self->normalize_number($_[$i->[1]])))