blib/lib/Number/Tolerant/Type/to.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 14 | 92.8 |
line | true | false | branch |
---|---|---|---|
24 | 1 | 17 | if $string =~ /\A($number)\s*<=$X<=\s*($number)\z/ |
26 | 1 | 16 | if $string =~ /\A($number)\s*>=$X>=\s*($number)\z/ |
28 | 1 | 15 | if $string =~ /\A($number)\s+to\s+($number)\z/ |
36 | 42 | 48 | unless 3 == grep({defined $_;} @_) |
37 | 15 | 33 | unless $_[1] eq 'to' |
39 | 0 | 33 | unless defined(my $from = $self->normalize_number($_[0])) |
40 | 1 | 32 | unless defined(my $to = $self->normalize_number($_[2])) |