| line |
true |
false |
branch |
|
59
|
12 |
0 |
unless &declared('CATEGORIES')
|
|
|
0 |
1 |
unless &declared('CATEGORIES')
|
|
82
|
0 |
6 |
if ($proc->{'terminated'}) { }
|
|
|
0 |
0 |
if ($proc->{'terminated'}) { }
|
|
85
|
0 |
0 |
unless $cmd_hash{$cmd}->NEED_STACK
|
|
|
0 |
0 |
unless $cmd_hash{$cmd}->NEED_STACK
|
|
122
|
4 |
1 |
if (exists $commands{$cmd}) { }
|
|
|
1 |
0 |
elsif ('syntax' eq $cmd) { }
|
|
|
0 |
0 |
if (exists $commands{$cmd}) { }
|
|
|
0 |
0 |
elsif ('syntax' eq $cmd) { }
|
|
168
|
0 |
0 |
if (scalar @$args == 1 and $args->[0] eq '*')
|
|
|
0 |
0 |
if (scalar @$args == 1 and $args->[0] eq '*')
|
|
172
|
0 |
0 |
if $value->Category eq $category
|
|
|
0 |
0 |
if $value->Category eq $category
|
|
181
|
0 |
0 |
if $category ne $commands{$name}->Category
|
|
|
0 |
0 |
if $category ne $commands{$name}->Category
|
|
183
|
0 |
0 |
defined $commands{$name}{'short_help'} ? :
|
|
|
0 |
0 |
defined $commands{$name}{'short_help'} ? :
|
|
192
|
1 |
1 |
if $self->{'syntax_files'}
|
|
|
0 |
0 |
if $self->{'syntax_files'}
|
|
202
|
0 |
0 |
if (scalar @$args == 2) { }
|
|
|
0 |
0 |
if (scalar @$args == 2) { }
|
|
206
|
0 |
0 |
unless ($self->{'syntax_summary_help'}{$name})
|
|
|
0 |
0 |
unless ($self->{'syntax_summary_help'}{$name})
|
|
222
|
0 |
0 |
if (-r $filename) { }
|
|
|
0 |
0 |
if (-r $filename) { }
|
|
241
|
1 |
0 |
if (scalar @$args > 1) { }
|
|
|
0 |
0 |
if (scalar @$args > 1) { }
|
|
243
|
1 |
0 |
if ($cmd_name eq '*') { }
|
|
|
0 |
0 |
elsif ($cmd_name =~ /^aliases$/i) { }
|
|
|
0 |
0 |
elsif ($cmd_name =~ /^syntax$/i) { }
|
|
|
0 |
0 |
elsif ($cmd_name =~ /^all$/i) { }
|
|
|
0 |
0 |
elsif ({breakpoints => 'Making the program stop at certain points', data => 'Examining data', files => 'Specifying and examining files', running => 'Running the program', stack => 'Examining the call stack', status => 'Status inquiries', support => 'Support facilities', syntax => 'Debugger command syntax'}->{$cmd_name}) { }
|
|
|
0 |
0 |
elsif ($proc->{'commands'}{$cmd_name} or $proc->{'aliases'}{$cmd_name}) { }
|
|
|
0 |
0 |
if ($cmd_name eq '*') { }
|
|
|
0 |
0 |
elsif ($cmd_name =~ /^aliases$/i) { }
|
|
|
0 |
0 |
elsif ($cmd_name =~ /^syntax$/i) { }
|
|
|
0 |
0 |
elsif ($cmd_name =~ /^all$/i) { }
|
|
|
0 |
0 |
elsif ({breakpoints => 'Making the program stop at certain points', data => 'Examining data', files => 'Specifying and examining files', running => 'Running the program', stack => 'Examining the call stack', status => 'Status inquiries', support => 'Support facilities', syntax => 'Debugger command syntax'}->{$cmd_name}) { }
|
|
|
0 |
0 |
elsif ($proc->{'commands'}{$cmd_name} or $proc->{'aliases'}{$cmd_name}) { }
|
|
247
|
1 |
0 |
if (scalar keys %{$$proc{'aliases'};})
|
|
|
0 |
0 |
if (scalar keys %{$$proc{'aliases'};})
|
|
268
|
0 |
0 |
if ($proc->{'commands'}{$cmd_name}) { }
|
|
|
0 |
0 |
if ($proc->{'commands'}{$cmd_name}) { }
|
|
276
|
0 |
0 |
$cmd_obj->can('help') ? :
|
|
|
0 |
0 |
$cmd_obj->can('help') ? :
|
|
277
|
0 |
0 |
if ($help_text)
|
|
|
0 |
0 |
if ($help_text)
|
|
284
|
0 |
0 |
if ($aliases_ref and scalar @{$aliases_ref;} and $args and scalar @$args == 2)
|
|
|
0 |
0 |
if ($aliases_ref and scalar @{$aliases_ref;} and $args and scalar @$args == 2)
|
|
295
|
0 |
0 |
if (not scalar @matches) { }
|
|
|
0 |
0 |
elsif (scalar @matches == 1) { }
|
|
|
0 |
0 |
if (not scalar @matches) { }
|
|
|
0 |
0 |
elsif (scalar @matches == 1) { }
|
|
313
|
0 |
0 |
unless (open FH, $filename)
|
|
|
0 |
0 |
unless (open FH, $filename)
|