| line |
true |
false |
branch |
|
49
|
2 |
58 |
$name =~ s/!$// ? : |
|
50
|
11 |
49 |
$name =~ s/=(\w\S*)$// ? : |
|
55
|
0 |
60 |
if ($name =~ s/=([\$\@\%])(.+)$//) |
|
67
|
0 |
60 |
unless ref $alias |
|
69
|
0 |
60 |
if ref $alias eq "ARRAY" |
|
71
|
0 |
60 |
unless ref $alias eq "HASH" |
|
79
|
1 |
59 |
unless ref $fallback eq "ARRAY" |
|
86
|
22 |
41 |
unless ($item =~ /:/) |
|
127
|
72 |
0 |
wantarray ? : |
|
145
|
0 |
275 |
unless $self->{'fallback'} |
|
146
|
0 |
508 |
unless defined $alias |
|
148
|
107 |
401 |
if (ref $alias eq 'ARRAY') { } |
|
|
74 |
327 |
elsif (defined $config->{$alias}) { } |
|
152
|
95 |
12 |
if ($ok) |
|
165
|
13 |
93 |
if (defined $self->{'default'}) |
|
170
|
1 |
92 |
if ($self->{'required'}) |
|
187
|
0 |
182 |
if ($self->{'arity'} == 2) { } |
|
|
0 |
182 |
elsif ($self->{'arity'} == 3) { } |
|
192
|
0 |
0 |
unless ref $value eq "ARRAY" |
|
202
|
0 |
182 |
if $self->{'action'} |
|
204
|
0 |
182 |
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 ? : |