Branch Coverage

blib/lib/Paranoid/Input.pm
Criterion Covered Total %
branch 59 72 81.9


line true false branch
70 1 52 unless @_
73 1 52 unless defined $/
75 8 44 if (ref $ref eq 'SCALAR' and defined $$ref) { }
43 1 elsif (ref $ref eq 'ARRAY') { }
1 0 elsif (ref $ref eq 'HASH') { }
76 5 3 if ($/ =~ /^$nl$/so) { }
84 43 0 if ($/ =~ /^$nl$/so) { }
86 0 1898 unless defined $_
95 1 0 if ($/ =~ /^$nl$/so) { }
97 0 4 unless defined $ref->{$_}
163 0 936 unless not defined $oref or ref $iref eq ref $oref
168 1 935 if (ref $type eq 'Regexp') { }
172 934 1 if (defined $type and exists $regexes{$type}) { }
180 582 354 unless (defined $oref)
181 2 578 ref $iref eq 'HASH' ? :
2 580 ref $iref eq 'ARRAY' ? :
188 928 8 if (ref $oref eq 'SCALAR') { }
4 4 elsif (ref $oref eq 'ARRAY') { }
197 935 1 if (defined $regex)
198 927 8 if (ref $iref eq 'SCALAR') { }
4 4 elsif (ref $iref eq 'ARRAY') { }
200 926 1 if defined $$iref
204 4 0 if (scalar @$iref)
208 11 0 defined $_ ? :
210 3 8 unless defined $oref->[-1]
216 4 0 if (scalar keys %$iref)
222 11 0 defined $iref->{$_} ? :
224 3 8 unless defined $oref->{$_}
231 582 354 unless ($po)
232 578 4 if (ref $iref eq 'SCALAR') { }
2 2 elsif (ref $iref eq 'ARRAY') { }
263 2 0 if (defined $input and @match)
266 6 0 if defined $_
269 6 0 if defined $_
270 4 2 m[^/(.+)/$]s ? :
276 1 2 if ($input =~ /$r/is)