Branch Coverage

lib/R/YapRI/Interpreter/Perl.pm
Criterion Covered Total %
branch 47 52 90.3


line true false branch
149 31 1 if (defined $pvar) { }
150 1 30 if (ref $pvar) { }
154 28 2 if ($pvar =~ /./) { }
156 11 17 if ($mbf->is_nan) { }
157 4 7 if ($pvar =~ /^(TRUE|FALSE)$/) { }
200 7 1 if (ref $aref eq 'ARRAY') { }
246 13 0 if (defined $parg) { }
247 12 1 if (ref $parg) { }
248 1 11 if (ref $parg eq 'ARRAY') { }
11 0 elsif (ref $parg eq 'HASH') { }
254 9 4 if (defined $$parg{$k} and $$parg{$k} =~ /./) { }
256 0 9 if (ref $$parg{$k} eq 'HASH') { }
2 7 elsif (ref $$parg{$k} eq 'ARRAY') { }
263 1 6 if (ref $$parg{$k})
342 24 1 if (defined $pvar) { }
343 7 17 if (not ref $pvar) { }
347 4 13 if (ref $pvar eq 'ARRAY') { }
12 1 elsif (ref $pvar eq 'HASH') { }
357 11 2 if (defined $args and $args =~ /./)
359 9 2 if ($obj =~ /./)
363 1 10 if (not ref $args) { }
369 3 7 if (ref $args eq 'ARRAY') { }
6 1 elsif (ref $args eq 'HASH') { }
373 6 0 if (defined $targ and $targ =~ /./)
380 6 0 if (defined $targs and $targs =~ /./)
390 8 2 if ($obj =~ /./)