| line |
true |
false |
branch |
|
16
|
0 |
33 |
exists $ENV{'NOFILL'} ? : |
|
17
|
0 |
33 |
exists $ENV{'DEBUG_STATS_B'} ? : |
|
18
|
0 |
33 |
exists $ENV{'IPRES'} ? : |
|
19
|
1 |
32 |
if exists $ENV{'TOLER'} |
|
42
|
20 |
224 |
/^(ignore_env|nofill|debug|ipres|toler|unbias)(?:=([\d\.\-_]+))?\z/i ? : |
|
45
|
5 |
192 |
if (grep {$$_[0] =~ /ignore_env/;} @special) |
|
56
|
10 |
5 |
if defined $v |
|
58
|
3 |
12 |
if (lc $k eq 'ipres') { } |
|
|
5 |
7 |
elsif (lc $k eq 'toler') { } |
|
59
|
1 |
2 |
unless defined $v |
|
60
|
0 |
3 |
unless $v >= 0 |
|
64
|
4 |
1 |
if (defined $v) { } |
|
65
|
0 |
4 |
unless $v >= 0 |
|
74
|
4 |
3 |
defined $v ? : |
|
95
|
0 |
197 |
unless eval $pull |
|
100
|
0 |
12 |
unless my $r = eval {
do {
'Statistics::Basic::ComputedVector'->new(@_)
}
} |
|
102
|
0 |
18 |
unless my $r = eval {
do {
'Statistics::Basic::Vector'->new(@_)
}
} |
|
103
|
0 |
26 |
unless my $r = eval {
do {
'Statistics::Basic::Mean'->new(@_)
}
} |
|
104
|
0 |
10 |
unless my $r = eval {
do {
'Statistics::Basic::Median'->new(@_)
}
} |
|
105
|
0 |
2 |
unless my $r = eval {
do {
'Statistics::Basic::Mode'->new(@_)
}
} |
|
106
|
0 |
2 |
unless my $r = eval {
do {
'Statistics::Basic::Variance'->new(@_)
}
} |
|
107
|
0 |
14 |
unless my $r = eval {
do {
'Statistics::Basic::StdDev'->new(@_)
}
} |
|
109
|
0 |
2 |
unless my $r = eval {
do {
'Statistics::Basic::Covariance'->new($_[0], $_[1])
}
} |
|
110
|
0 |
6 |
unless my $r = eval {
do {
'Statistics::Basic::Correlation'->new($_[0], $_[1])
}
} |
|
111
|
0 |
1 |
unless my $r = eval {
do {
'Statistics::Basic::LeastSquareFit'->new($_[0], $_[1])
}
} |
|
116
|
0 |
2 |
unless my $v3 = eval {
do {
computed($v1)
}
} |
|
117
|
0 |
2 |
unless my $v4 = eval {
do {
computed($v2)
}
} |
|
121
|
10 |
3 |
if defined $v[$_] |
|
126
|
10 |
3 |
if defined $v[$_] |