| line |
true |
false |
branch |
|
41
|
0 |
0 |
unless (@$arglist) |
|
48
|
0 |
0 |
if (my $sub = $self->can("cmd_$cmd")) { } |
|
|
0 |
0 |
elsif ($self->can($cmd)) { } |
|
81
|
0 |
0 |
unless my $sub = $self->can($method) |
|
86
|
0 |
0 |
unless ($no_exit_code) |
|
95
|
0 |
0 |
if ($self->scalar) { } |
|
97
|
0 |
0 |
if not $self->quiet and $res[0] |
|
100
|
0 |
0 |
if not $self->quiet and @res |
|
111
|
0 |
0 |
unless my $emitter = $self->can("cli_write_fh_as_$format") |
|
114
|
0 |
0 |
if ($self->scalar) { } |
|
124
|
0 |
0 |
ref $item ? : |
|
132
|
0 |
0 |
unless $self->binary |
|
149
|
0 |
0 |
$self->cli_examine_result($list) ? : |
|
154
|
0 |
0 |
if ($self->scalar) { } |
|
175
|
0 |
0 |
if @cmds |
|
177
|
0 |
0 |
if @cmds and @opts |
|
179
|
0 |
0 |
if @opts |
|
193
|
0 |
0 |
defined $attsDict->{'Doc'} ? : |
|
201
|
0 |
0 |
unless my($name, $value) = $attDesc =~ /^([^\(]+)([\(].*)?\z/ |
|
203
|
0 |
0 |
if defined $value |
|
215
|
0 |
0 |
if ($att->associated_class == $meta) { } |
|
218
|
0 |
0 |
length $name > $maxLen ? : |
|
235
|
0 |
0 |
unless (ref $self and $self->can("binary") and $self->binary) |
|
243
|
0 |
0 |
unless (defined $result) |
|
244
|
0 |
0 |
$wantarray ? : |
|
251
|
0 |
0 |
unless defined $n |
|
252
|
0 |
0 |
if $alias and $alias->{$n} |
|
253
|
0 |
0 |
unless defined $v |
|
254
|
0 |
0 |
if (ref $result eq 'HASH') { } |
|
263
|
0 |
0 |
$wantarray && ref $result ne 'HASH' ? : |
|
267
|
0 |
0 |
if ($_[1] =~ /^(?:\[.*?\]|\{.*?\})\z/s) { } |
|
|
0 |
0 |
elsif (not &Encode::is_utf8($_[1]) and $_[1] =~ /\P{ASCII}/) { } |
|
269
|
0 |
0 |
if &Encode::is_utf8($copy) |