| line |
!l |
l&&!r |
l&&r |
condition |
|
193
|
0 |
0 |
10 |
$func =~ /^(add|get)_(.*)$/ and $tag = $Gedcom::Funcs{lc $2} |
|
|
0 |
0 |
10 |
$func =~ /^(add|get)_(.*)$/ and $tag = $Gedcom::Funcs{lc $2} and exists $Top_tag_order{$tag} |
|
206
|
8 |
2 |
2 |
defined $val and $tag eq 'NOTE' |
|
377
|
7 |
0 |
0 |
$self->{'encoding'} eq 'utf-8' and $] >= 5.8 |
|
387
|
0 |
0 |
0 |
$self->{'encoding'} eq 'utf-8' and $] >= 5.8 |
|
571
|
288 |
37 |
2 |
not $all and @i |
|
580
|
192 |
0 |
6 |
not $all and @i |
|
589
|
96 |
0 |
0 |
not $all and @i |
|
612
|
98 |
3514 |
1706 |
defined $c->{'xref'} and $c->{'xref'} =~ /$re/ |
|
|
3612 |
432 |
1274 |
defined $c->{'xref'} and $c->{'xref'} =~ /$re/ and $1 > $last |