| line |
true |
false |
branch |
|
158
|
3 |
17 |
if ($str =~ s/ +z(.?)([<>])\s*(\d+(\.\d+)?)//) |
|
168
|
6 |
14 |
unless $str =~ /^:/ |
|
188
|
0 |
22 |
if ($s =~ s/\.(.)$//) |
|
191
|
0 |
22 |
if ($s =~ /^\d+$/) { } |
|
|
12 |
10 |
elsif ($s =~ /^[a-zA-Z]+$/) { } |
|
|
0 |
10 |
elsif ($s =~ /^[a-zA-Z=?]+$/) { } |
|
|
7 |
3 |
elsif ($s eq '*') { } |
|
|
3 |
0 |
elsif ($s =~ /^(\d+|\*)-(\d+|\*)/) { } |
|
203
|
0 |
3 |
if $from eq '*' |
|
204
|
1 |
2 |
if $to eq '*' |
|
207
|
74 |
76 |
if $n >= $from |
|
213
|
0 |
0 |
if lc $_->attr('pdb/chain_id') eq $chain_id |
|
215
|
0 |
22 |
$chain_id ? : |
|
221
|
4 |
19 |
if ($s =~ /^\d+$/) { } |
|
|
13 |
6 |
elsif ($s =~ /^[a-zA-Z0-9='"?]+$/) { } |
|
|
6 |
0 |
elsif ($s eq '*') { } |
|
240
|
0 |
18 |
if ($$self{'matched'} and $$self{'matched'} eq $mol) |
|
246
|
0 |
20 |
if $DEBUG |
|
249
|
0 |
21 |
if $DEBUG |
|
254
|
0 |
22 |
if $DEBUG |
|
257
|
0 |
21 |
if ($$self{'options'}{'unique'}) |
|
262
|
0 |
21 |
if $DEBUG |
|
267
|
0 |
410 |
if $DEBUG |
|
273
|
0 |
20 |
if ($$self{'options'}{'unique'}) |
|
277
|
17 |
3 |
if ($$term{'type'} eq 'normal') { } |
|
|
0 |
3 |
elsif ($$term{'type'} eq 'zone_r') { } |
|
|
3 |
0 |
elsif ($$term{'type'} eq 'zone_a') { } |
|
286
|
2 |
1 |
$first ? : |
|
288
|
812 |
820 |
if ($a->coords - $_->coords)->length < $d |
|
295
|
18 |
2 |
if ($first) { } |
|
305
|
3 |
58 |
if $seen{$_} |
|
308
|
0 |
20 |
unless @ret |
|
311
|
0 |
18 |
if ($$self{'options'}{'sort'}) |