line |
true |
false |
branch |
65
|
16 |
0 |
@_ ? : |
68
|
16 |
0 |
if $regex and $regex =~ /^$rex_parse$/ |
69
|
0 |
16 |
unless $regex |
72
|
16 |
0 |
if (not exists $modules{$caller}) |
75
|
16 |
0 |
if ($cback) |
77
|
18 |
0 |
if (not ref $_) { } |
78
|
17 |
1 |
if ($_ =~ /^$rex_proc$/) { } |
85
|
0 |
1 |
$_ =~ /\:\:/go ? : |
89
|
0 |
0 |
unless 'CODE' eq ref $_ |
101
|
16 |
0 |
ref $regex ? : |
116
|
16 |
0 |
if (not defined $modules{$$self}) |
130
|
0 |
16 |
if $tell < 0 |
134
|
5 |
11 |
ref $rex eq 'CODE' ? : |
138
|
0 |
16 |
unless @data |
142
|
11 |
5 |
if $data[0] =~ /^\s*$/o |
143
|
0 |
16 |
if $data[-1] =~ /^\s*$/o |
144
|
0 |
16 |
if @data % 2 |
148
|
16 |
0 |
if ($code) |
182
|
9 |
9 |
if ($i) |
237
|
1 |
104 |
unless defined $modules{$$self} |
245
|
0 |
0 |
unless defined $modules{$$self} |
252
|
15 |
15 |
unless defined $modules{$$self} |
260
|
0 |
105 |
unless defined $modules{$$self} |