| line |
true |
false |
branch |
|
74
|
0 |
0 |
unless @_ >= 2 and @_ <= 3 |
|
80
|
0 |
0 |
unless ref $_[0] eq "HASH" |
|
87
|
0 |
0 |
unless do {
if (defined $_[1]) {
ref \(my $val = $_[1]) eq "SCALAR" unless ref \$_[1] eq "SCALAR";
}
} |
|
90
|
0 |
0 |
if (defined $_[1]) |
|
91
|
0 |
0 |
unless ref \$_[1] eq "SCALAR" |
|
101
|
0 |
0 |
unless $#_ >= 2 |
|
115
|
0 |
0 |
@_ - 1 == 1 ? : |
|
129
|
0 |
1 |
unless @_ == 1 |
|
145
|
0 |
1 |
unless @_ == 1 |
|
162
|
0 |
1 |
unless @_ == 1 |
|
183
|
0 |
1 |
unless @_ == 2 |
|
189
|
0 |
1 |
unless ref $_[0] eq "HASH" |
|
195
|
0 |
1 |
unless do {
if (defined $_[1]) {
ref \(my $val = $_[1]) eq "SCALAR" unless ref \$_[1] eq "SCALAR";
}
} |
|
198
|
1 |
0 |
if (defined $_[1]) |
|
199
|
0 |
1 |
unless ref \$_[1] eq "SCALAR" |
|
222
|
0 |
1 |
unless @_ >= 2 |
|
244
|
0 |
2 |
unless @_ == 2 |
|
250
|
0 |
2 |
unless ref $_[0] eq "HASH" |
|
257
|
0 |
2 |
unless do {
unless (ref $_[1] eq "CODE") {
&Scalar::Util::blessed($_[1]) and $_[1]->isa("Regexp") unless ref $_[1] and not !&re::is_regexp($_[1]);
}
} |
|
262
|
1 |
1 |
unless (ref $_[1] eq "CODE") |
|
267
|
0 |
1 |
unless ref $_[1] and not !&re::is_regexp($_[1]) |
|
283
|
1 |
1 |
'CODE' eq ref $shv_match ? : |
|
293
|
0 |
2 |
unless ref $shv_final_unchecked eq "HASH" |
|
303
|
0 |
2 |
wantarray ? : |
|
316
|
0 |
1 |
unless @_ == 1 |
|
337
|
0 |
2 |
unless @_ == 2 |
|
343
|
0 |
2 |
unless ref $_[0] eq "HASH" |
|
349
|
0 |
2 |
unless do {
if (defined $_[1]) {
ref \(my $val = $_[1]) eq "SCALAR" unless ref \$_[1] eq "SCALAR";
}
} |
|
352
|
2 |
0 |
if (defined $_[1]) |
|
353
|
0 |
2 |
unless ref \$_[1] eq "SCALAR" |
|
381
|
0 |
0 |
unless @_ == 2 |
|
387
|
0 |
0 |
unless ref $_[0] eq "HASH" |
|
394
|
0 |
0 |
unless ref $_[1] eq "CODE" |
|
421
|
0 |
0 |
unless @_ == 2 |
|
427
|
0 |
0 |
unless ref $_[0] eq "HASH" |
|
434
|
0 |
0 |
unless ref $_[1] eq "CODE" |
|
463
|
0 |
0 |
unless @_ == 2 |
|
469
|
0 |
0 |
unless ref $_[0] eq "HASH" |
|
476
|
0 |
0 |
unless ref $_[1] eq "CODE" |
|
498
|
0 |
1 |
unless @_ >= 2 |
|
501
|
0 |
1 |
@_ - 1 > 1 ? : |
|
514
|
0 |
2 |
unless @_ == 1 |
|
530
|
0 |
1 |
unless @_ == 1 |
|
546
|
0 |
0 |
unless @_ == 1 |
|
562
|
0 |
0 |
unless @_ == 1 |
|
570
|
0 |
0 |
unless ref $shv_final_unchecked eq "HASH" |
|
592
|
0 |
1 |
unless @_ >= 3 |
|
596
|
0 |
1 |
if scalar(@shv_params) % 2 |
|
602
|
0 |
1 |
if grep((!defined($_)), @shv_params[@shv_keys_idx]) |
|
608
|
0 |
2 |
unless do {
if (defined $shv_params[$shv_tmp]) {
ref \(my $val = $shv_params[$shv_tmp]) eq "SCALAR" unless ref \$shv_params[$shv_tmp] eq "SCALAR";
}
} |
|
611
|
2 |
0 |
if (defined $shv_params[$shv_tmp]) |
|
612
|
0 |
2 |
unless ref \$shv_params[$shv_tmp] eq "SCALAR" |
|
625
|
0 |
1 |
wantarray ? : |
|
638
|
0 |
0 |
unless @_ == 1 |
|
655
|
0 |
1 |
unless @_ == 1 |
|
671
|
0 |
1 |
unless @_ == 1 |