| line |
true |
false |
branch |
|
49
|
2 |
57 |
$name =~ s/!$// ? : |
|
50
|
11 |
48 |
$name =~ s/=(\w\S*)$// ? : |
|
55
|
0 |
59 |
if ($name =~ s/=([\$\@\%])(.+)$//) |
|
67
|
0 |
59 |
unless ref $alias |
|
69
|
0 |
59 |
if ref $alias eq "ARRAY" |
|
71
|
0 |
59 |
unless ref $alias eq "HASH" |
|
79
|
1 |
58 |
unless ref $fallback eq "ARRAY" |
|
86
|
22 |
40 |
unless ($item =~ /:/) |
|
127
|
71 |
0 |
wantarray ? : |
|
145
|
0 |
267 |
unless $self->{'fallback'} |
|
146
|
0 |
495 |
unless defined $alias |
|
148
|
102 |
393 |
if (ref $alias eq 'ARRAY') { } |
|
|
71 |
322 |
elsif (defined $config->{$alias}) { } |
|
152
|
92 |
10 |
if ($ok) |
|
165
|
13 |
91 |
if (defined $self->{'default'}) |
|
170
|
1 |
90 |
if ($self->{'required'}) |
|
187
|
0 |
176 |
if ($self->{'arity'} == 2) { } |
|
|
0 |
176 |
elsif ($self->{'arity'} == 3) { } |
|
192
|
0 |
0 |
unless ref $value eq "ARRAY" |
|
202
|
0 |
176 |
if $self->{'action'} |
|
204
|
0 |
176 |
if (&blessed($object) and $method = $self->{'method'}) |
|
220
|
0 |
0 |
if ($self->{'args'}) { } |
|
224
|
0 |
0 |
unless @$args and defined $args->[0] and not $args->[0] =~ /^-/ |
|
228
|
0 |
0 |
if ($self->{'arity'} == 3) |
|
230
|
0 |
0 |
unless @$args and defined $args->[0] and not $args->[0] =~ /^-/ |
|
261
|
0 |
0 |
if (length $args) |
|
265
|
0 |
0 |
$reporter ? : |