| line |
true |
false |
branch |
|
24
|
1 |
120 |
unless @_ |
|
42
|
113 |
1632 |
if ($type eq 'CODE') |
|
49
|
5 |
1627 |
$arg =~ s/^([!:-]?)\+/$1/ ? : |
|
52
|
3 |
1629 |
if ($arg =~ /^!(.*)$/) |
|
53
|
1 |
2 |
$full ? : |
|
59
|
162 |
1467 |
if ($arg =~ /^-(.*)$/) |
|
60
|
1 |
161 |
$full ? : |
|
68
|
2 |
1465 |
if ($arg =~ /^:(.*)$/) |
|
69
|
0 |
2 |
$full ? : |
|
78
|
0 |
1 |
unless $fname eq $file |
|
81
|
0 |
2 |
$ENV{'TS_LB_PATH'} ? : |
|
89
|
7 |
1458 |
if ($arg =~ /^[a-z]/) |
|
92
|
1 |
6 |
unless $class->can($method) |
|
100
|
1455 |
3 |
unless $full |
|
106
|
114 |
1265 |
if @_ and ref $_[0] || $_[0] && $_[0] eq '*' |
|
109
|
17 |
0 |
$val eq '*' ? : |
|
|
17 |
1441 |
if defined $val and not ref $val |
|
113
|
1452 |
6 |
unless $args{$arg} |
|
116
|
114 |
1344 |
if defined $val |
|
121
|
113 |
1454 |
if ($type eq 'CODE') |
|
126
|
4 |
1450 |
if $skip{$arg} |
|
132
|
2 |
1448 |
unless (eval {
do {
require $file;
1
}
}) |
|
140
|
542 |
906 |
if ($mod->can('load_ts_plugin')) { } |
|
|
906 |
0 |
elsif (my $meta = 'Test::Stream::Exporter::Meta'->get($mod)) { } |
|
|
0 |
0 |
elsif (@$import) { } |
|
164
|
3 |
2 |
unless $args->{'Test::Stream::Plugin::Class'} |
|
179
|
3 |
1 |
unless $args->{'Test::Stream::Plugin::SkipWithout'} |
|
195
|
1 |
1 |
unless $args->{'Test::Stream::Plugin::SRand'} |