| line |
true |
false |
branch |
|
50
|
8 |
0 |
if (@_) |
|
53
|
8 |
0 |
ref $_[0] eq 'ARRAY' ? : |
|
54
|
0 |
15 |
unless defined $$_{'name'} and defined $$_{'when'} and defined $$_{'what'} |
|
59
|
0 |
15 |
unless ref $$_{'what'} eq 'CODE' and ref $$_{'when'} eq 'CODE' |
|
63
|
0 |
15 |
if $$_{'whatargs'} and ref $$_{'whatargs'} ne 'ARRAY' |
|
67
|
1 |
14 |
if $$_{'whenargs'} and ref $$_{'whenargs'} ne 'ARRAY' |
|
75
|
0 |
7 |
wantarray ? : |
|
82
|
4 |
11 |
if @_ |
|
83
|
8 |
7 |
defined $ENV{'RMTESTING'} ? : |
|
90
|
3 |
16 |
if @_ |
|
91
|
10 |
9 |
defined $ENV{'RMVERBOSE'} ? : |
|
98
|
2 |
10 |
if @_ |
|
99
|
7 |
5 |
defined $ENV{'RMCONT'} ? : |
|
136
|
12 |
6 |
if (defined $ENV{'RMSTATES'}) |
|
137
|
4 |
8 |
if (grep {$_ eq $name;} split(/:/, $ENV{'RMSTATES'}, 0)) { } |
|
146
|
2 |
8 |
ref $$_{'whenargs'} eq 'ARRAY' ? : |
|
|
8 |
2 |
if ($$_{'when'}(ref $$_{'whenargs'} eq 'ARRAY' ? @{$$_{'whenargs'};} : ())) { } |
|
149
|
2 |
6 |
if $self->verbose |
|
151
|
4 |
4 |
if ($self->testing) { } |
|
152
|
2 |
2 |
if $self->verbose |
|
156
|
1 |
3 |
ref $$_{'whatargs'} eq 'ARRAY' ? : |
|
161
|
4 |
4 |
unless $self->cont |
|
163
|
0 |
2 |
if $self->verbose |
|
176
|
0 |
6 |
unless $$self{'status'} and ref $$self{'status'} eq 'HASH' |