Branch Coverage

lib/Devel/Trepan/CmdProcessor/Command/Break.pm
Criterion Covered Total %
branch 11 68 16.1


line true false branch
79 1 2 if ($arg_count == 0) { }
0 0 if ($arg_count == 0) { }
83 0 2 if ($arg_count > 2) { }
0 0 if ($arg_count > 2) { }
84 0 0 if ($args[0] eq 'if') { }
0 0 if ($args[0] eq 'if') { }
90 0 0 if ($args[1] =~ /\d+/) { }
0 0 elsif ($args[1] eq 'if') { }
0 0 if ($args[1] =~ /\d+/) { }
0 0 elsif ($args[1] eq 'if') { }
102 1 1 if ($line_or_fn =~ /^\d+/) { }
0 0 if ($line_or_fn =~ /^\d+/) { }
107 1 0 if (scalar @matches == 1) { }
0 0 if (scalar @matches == 1) { }
112 0 0 if (&is_cached($canonic_name))
0 0 if (&is_cached($canonic_name))
117 1 1 if ($arg_count == 2 and $args[1] =~ /\d+/)
0 0 if ($arg_count == 2 and $args[1] =~ /\d+/)
123 0 2 if (scalar @args)
0 0 if (scalar @args)
124 0 0 if ($args[0] eq 'if') { }
0 0 if ($args[0] eq 'if') { }
134 0 2 if ($msg)
0 0 if ($msg)
135 0 0 if ($msg =~ /not known to be a trace line/)
0 0 if ($msg =~ /not known to be a trace line/)
139 0 0 unless $force
0 0 unless $force
145 0 3 if (defined $bp)
0 0 if (defined $bp)
146 0 0 $bp->type eq 'tbrkpt' ? :
0 0 $bp->type eq 'tbrkpt' ? :
156 0 0 if (defined $text and $text =~ /^\s*use\s+/)
0 0 if (defined $text and $text =~ /^\s*use\s+/)