line |
!l |
l&&!r |
l&&r |
condition |
28
|
16 |
4 |
1 |
exists $args->{'key2pitch'} and exists $args->{'key_set'} |
35
|
1 |
1 |
2 |
defined $args->{'key2pitch'} and ref $args->{'key2pitch'} eq 'HASH' |
|
2 |
1 |
1 |
defined $args->{'key2pitch'} and ref $args->{'key2pitch'} eq 'HASH' and keys %{$$args{'key2pitch'}} |
39
|
1 |
1 |
13 |
defined $set and ref $set eq 'HASH' |
|
2 |
1 |
12 |
defined $set and ref $set eq 'HASH' and keys %$set |
47
|
1 |
1 |
10 |
defined $set->{'intervals'} and ref $set->{'intervals'} eq 'ARRAY' |
|
2 |
1 |
9 |
defined $set->{'intervals'} and ref $set->{'intervals'} eq 'ARRAY' and @{$set->{'intervals'}} |
51
|
1 |
1 |
7 |
defined $set->{'keys'} and ref $set->{'keys'} eq 'ARRAY' |
|
2 |
1 |
6 |
defined $set->{'keys'} and ref $set->{'keys'} eq 'ARRAY' and @{$set->{'keys'}} |
53
|
1 |
1 |
4 |
defined $set->{'min'} and $set->{'min'} =~ /^(?a)-?\d+$/u |
55
|
1 |
1 |
2 |
defined $set->{'max'} and $set->{'max'} =~ /^(?a)-?\d+$/u |
87
|
1 |
1 |
17 |
defined $sequence and ref $sequence eq 'ARRAY' |
93
|
1 |
1 |
1 |
defined $param{'renew'} and ref $param{'renew'} eq 'CODE' |
99
|
1 |
1 |
12 |
defined $key2pitch and ref $key2pitch eq 'HASH' |
|
2 |
1 |
11 |
defined $key2pitch and ref $key2pitch eq 'HASH' and keys %$key2pitch |
164
|
1 |
1 |
1 |
ref $possible[$i] eq 'ARRAY' and $possible[$i][0] == -1 |