Branch Coverage

blib/lib/Data/Freq/Record.pm
Criterion Covered Total %
branch 29 36 80.5


line true false branch
120 0 186 if (not defined $input) { }
121 65 elsif (not ref $input) { }
60 5 elsif (ref $input eq 'ARRAY') { }
5 0 elsif (ref $input eq 'HASH') { }
150 94 4 if defined $self->{'text'}
152 2 2 if (defined $self->{'array'})
170 128 30 if defined $self->{'array'}
172 28 2 if (defined $self->{'text'})
188 3 2 if defined $self->{'hash'}
204 0 18 if $self->{'date_tried'}
208 0 18 unless my $array = $self->array
210 1 17 if (my $pos = shift())
213 0 1 unless $str =~ /\D/
218 17 27 if ($item =~ /^ \[ (.*) \] $/x)
220 17 0 if defined $t
230 1 17 if $str =~ s/[,\.](\d+)$//
232 0 18 unless defined $t
234 1 17 if $msec