| line |
true |
false |
branch |
|
25
|
1573 |
1 |
unless @list |
|
30
|
1 |
2071 |
unless $ref == \&{$name;} |
|
35
|
2071 |
8284 |
if defined *GLOBCLONE{$slot} |
|
47
|
0 |
4619 |
unless Test::Stream::Exporter::Meta::get($_[0]) |
|
61
|
6301 |
841 |
if ($args and @$args) { } |
|
70
|
111 |
11747 |
if (not ref $item and $item =~ /^-(all|default)$/) { } |
|
|
2 |
11745 |
elsif ($item =~ /^!(.*)$/) { } |
|
72
|
110 |
1 |
if $tag eq 'all' |
|
73
|
1 |
110 |
if $tag eq 'default' |
|
82
|
1 |
6300 |
if $def |
|
83
|
110 |
6191 |
if $all |
|
90
|
1 |
18680 |
unless my $ref = $exports->{$export} |
|
94
|
64 |
18616 |
if (@imports and ref $imports[0]) |
|
96
|
1 |
63 |
unless &reftype($options) eq 'HASH' |
|
109
|
2 |
18676 |
if $exclude{$export} |
|
130
|
1 |
800 |
unless my $meta = Test::Stream::Exporter::Meta::get($caller) |
|
140
|
1 |
1032 |
unless my $meta = Test::Stream::Exporter::Meta::get($caller) |
|
149
|
1 |
345 |
unless my $meta = Test::Stream::Exporter::Meta::get($caller) |
|
159
|
1 |
825 |
unless my $meta = Test::Stream::Exporter::Meta::get($caller) |