Branch Coverage

File:blib/lib/Debug/Client.pm
Coverage:74.0%

line%coveragebranch
15850TFunless $sock
22550TFunless wantarray
248100TFif ($buf =~ /^(scalar|list) context return from (\S+):\s*(.*)/s)
291100TFif (not defined $param) { }
32050TFif ($buf =~ /^Subroutine [\w:]+ not found\./) { }
100TFelsif ($buf =~ /^Line \d+ not breakable\./) { }
100TFelsif ($buf =~ /\S/) { }
369100TFunless (wantarray)
38750TFif ($buf =~ s/^($PATH):\s*($LINE):\s*($CODE)\s+break if \(($COND)\)s*//) { }
412100TFunless defined $code
43450TFunless defined $var
436100TFif ($var =~ /^\$/) { }
50TFelsif ($var =~ /\@/ or $var =~ /\%/) { }
46550TFunless (defined $ret)
46950TFunless ($ret)
488100TFif (not defined $buf && ref $buf or ref $buf ne 'SCALAR')
49350TFif ($$buf =~ s/\s*DB<(\d+)>\s*$//)
51450TFif (not defined $buf && ref $buf or ref $buf ne 'SCALAR')
518100TFif ($$buf =~ /Debugged program terminated/)
52750TFunless (defined $line)
532100TFif ($line =~ /^\d+: \s* (.*)$/x)
54350TFif ($line =~ /^([\w:]*) # module \( ([^\)]*):(\d+) \) # (file:row) :\t? # : (.*) # content /mx)
552100TFif ($cont)
580100TFif (wantarray) { }
60750TFif $ENV{'DEBUG_LOGGER'}