| line |
true |
false |
branch |
|
43
|
0 |
1 |
@_ && ref $_[0] eq 'HASH' ? : |
|
44
|
1 |
0 |
unless exists $global_opts->{'into'} |
|
48
|
1 |
0 |
@_ ? : |
|
57
|
0 |
1 |
if $not_want{$wanted->[0]} |
|
68
|
0 |
0 |
@_ && ref $_[0] eq 'HASH' ? : |
|
69
|
0 |
0 |
unless exists $global_opts->{'into'} |
|
74
|
0 |
0 |
@_ ? : |
|
82
|
0 |
0 |
if $expando == \&Exporter::Tiny::_exporter_expand_sub |
|
86
|
0 |
0 |
if $not_want{$wanted->[0]} |
|
88
|
0 |
0 |
if ($wanted->[1]) |
|
91
|
0 |
0 |
unless ref $wanted->[1] eq 'HASH' and not keys %{$$wanted[1];} |
|
96
|
0 |
0 |
defined $expando ? : |
|
117
|
0 |
0 |
unless ref $tag_opts eq 'HASH' |
|
119
|
0 |
0 |
if exists $tag_opts->{'-as'} and ref $tag_opts->{'-as'} ne 'CODE' |
|
124
|
0 |
0 |
if defined $export->[1] and ref $export->[1] ne 'HASH' |
|
126
|
0 |
0 |
unless $export->[1] |
|
128
|
0 |
0 |
if exists $export->[1]{'-prefix'} and exists $tag_opts->{'-prefix'} |
|
130
|
0 |
0 |
if exists $export->[1]{'-suffix'} and exists $tag_opts->{'-suffix'} |
|
150
|
0 |
0 |
if ref $tags->{$name} eq 'CODE' |
|
153
|
0 |
0 |
if exists $tags->{$name} |
|
155
|
0 |
0 |
if $name eq 'all' |
|
158
|
0 |
0 |
if $name eq 'default' |
|
179
|
0 |
0 |
$globals->{'is_unimport'} ? : |
|
192
|
0 |
232 |
unless length $b <=> length $a |
|
209
|
0 |
1 |
if ($name =~ /\A([&\$\%\@\*])(.+)\z/) |
|
212
|
0 |
0 |
if ($sigil eq '*') |
|
216
|
1 |
0 |
$sigil eq '&' ? : |
|
218
|
1 |
0 |
if ($sigilname =~ /$permitted/ms) |
|
228
|
0 |
1 |
if $generator |
|
231
|
1 |
0 |
if $sub |
|
234
|
0 |
0 |
if ($sigil ne '&') |
|
236
|
0 |
0 |
if $evalled |
|
250
|
0 |
0 |
if $globals->{'is_unimport'} |
|
269
|
0 |
1 |
exists $value->{'-as'} ? : |
|
|
0 |
1 |
ref $value->{'-as'} ? : |
|
|
0 |
1 |
ref $globals->{'as'} ? : |
|
271
|
0 |
1 |
unless defined $name |
|
274
|
1 |
0 |
unless (ref $name) |
|
275
|
0 |
1 |
if ($name =~ /\A([&\$\%\@\*])(.+)\z/) |
|
278
|
0 |
0 |
if ($sigil eq '*') |
|
287
|
1 |
0 |
$sigil eq '&' ? : |
|
295
|
0 |
1 |
if ref $name eq 'SCALAR' |
|
296
|
0 |
1 |
if ref $into eq 'HASH' |
|
301
|
0 |
1 |
if (ref $sym eq 'CODE' and exists &{"${into}::$name";} and \&{"${into}::$name";} != $sym) |
|
317
|
0 |
0 |
if $TRACKED{$class}{$into}{$sigilname} |
|
319
|
0 |
0 |
$action == \&Exporter::Tiny::_croak ? : |
|
335
|
0 |
1 |
$installer ? : |
|
344
|
0 |
0 |
if ref $into |
|
349
|
0 |
0 |
if ($name =~ /\A([&\$\%\@\*])(.+)\z/) |
|
352
|
0 |
0 |
if ($sigil eq '*') |
|
356
|
0 |
0 |
$sigil eq '&' ? : |
|
358
|
0 |
0 |
if ($sigil ne '&') |
|
365
|
0 |
0 |
exists &{"${into}::$name";} ? : |
|
366
|
0 |
0 |
unless $our_coderef == $cur_coderef |
|
373
|
0 |
0 |
unless defined *{$old;}{$type} |
|
382
|
0 |
1 |
unless my $in = shift() |
|
385
|
0 |
0 |
ref $in->{$_} ? : |
|
|
0 |
1 |
if ref $in eq 'HASH' |
|
393
|
0 |
0 |
!ref($$in[$i + 1]) ? : |
|
|
0 |
0 |
!defined($$in[$i + 1]) ? : |
|
|
1 |
0 |
$i == $#$in ? : |
|
406
|
0 |
0 |
unless my $in = shift() |