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->{$_}
162 0 942 unless not defined $oref or ref $iref eq ref $oref
167 1 941 if (ref $type eq 'Regexp') { }
171 940 1 if (defined $type and exists $regexes{$type}) { }
179 586 356 unless (defined $oref)
180 2 582 ref $iref eq 'HASH' ? :
2 584 ref $iref eq 'ARRAY' ? :
187 934 8 if (ref $oref eq 'SCALAR') { }
4 4 elsif (ref $oref eq 'ARRAY') { }
196 941 1 if (defined $regex)
197 933 8 if (ref $iref eq 'SCALAR') { }
4 4 elsif (ref $iref eq 'ARRAY') { }
199 932 1 if defined $$iref
203 4 0 if (scalar @$iref)
207 11 0 defined $_ ? :
209 3 8 unless defined $oref->[-1]
215 4 0 if (scalar keys %$iref)
221 11 0 defined $iref->{$_} ? :
223 3 8 unless defined $oref->{$_}
230 586 356 unless ($po)
231 582 4 if (ref $iref eq 'SCALAR') { }
2 2 elsif (ref $iref eq 'ARRAY') { }
260 2 0 if (defined $input and @match)
263 6 0 if defined $_
266 6 0 if defined $_
267 4 2 m[^/(.+)/$]s ? :
273 1 2 if ($input =~ /$r/is)