| line |
true |
false |
branch |
| 33 |
1 |
3 |
if (not $$break_cycle{$name} and $db and my(@hashes) = grep({$_ ne $name;} $data =~ /\#(\S+)/g)) |
| 57 |
1 |
9 |
wantarray ? : |
| 65 |
0 |
4 |
unless exists $$self{'path'}{$tag} |
| 72 |
2 |
2 |
if exists $$self{'path'} |
| 86 |
16 |
42 |
if $tag =~ /$METAWORD/o |
| 87 |
14 |
28 |
if ($tag =~ /^[?\#]/) |
| 88 |
2 |
12 |
if $position == 0 |
| 92 |
4 |
24 |
if ($position > $current_position) { } |
| |
22 |
2 |
elsif ($position == $current_position) { } |
| 106 |
2 |
0 |
if ($$s[0] == $position) |
| 117 |
2 |
0 |
if @path |