line |
true |
false |
branch |
1245
|
1 |
1 |
$_[2] ? : |
1257
|
1 |
1 |
if @_ == 2 |
1264
|
2 |
3 |
if @_ == 2 |
1275
|
1 |
1 |
@ms ? : |
1276
|
1 |
1 |
@ms ? : |
1277
|
1 |
1 |
wantarray ? : |
1279
|
3 |
1 |
$_[0] =~ s/$_[1]/$_[2]/ ? : |
1280
|
0 |
4 |
if (Want::want('LIST')) { } |
|
2 |
2 |
elsif (Want::want('BOOL')) { } |
|
1 |
1 |
elsif (Want::want('SCALAR')) { } |
1310
|
4 |
1 |
$_[0] < $_[1] ? : |
1311
|
1 |
4 |
wantarray ? : |
1314
|
1 |
1 |
wantarray ? : |
1318
|
1 |
1 |
wantarray ? : |
1345
|
2 |
0 |
if $_[0] |
1351
|
0 |
1 |
unless $_[0] |
1373
|
0 |
25 |
unless defined $size |
1374
|
25 |
0 |
defined $size ? : |
1375
|
4 |
21 |
defined $char ? : |
1377
|
0 |
25 |
if (CORE::length $char > 1) |
1385
|
5 |
20 |
if $size <= $len |
1400
|
6 |
3 |
unless defined $trim_charset |
1409
|
6 |
3 |
unless defined $trim_charset |
1435
|
5 |
1 |
if &Scalar::Util::looks_like_number($_[0]) |
1436
|
5 |
1 |
if &Scalar::Util::looks_like_number($_[0]) |
1437
|
6 |
0 |
if &Scalar::Util::looks_like_number($_[0]) |
1439
|
3 |
1 |
if &Scalar::Util::looks_like_number($_[0]) |
1462
|
0 |
0 |
wantarray ? : |
1471
|
1 |
2 |
wantarray ? : |
1475
|
1 |
1 |
wantarray ? : |
1532
|
2 |
2 |
wantarray ? : |
1545
|
0 |
2 |
if grep {CORE::ref $_;} CORE::values %{$_[0];} |
1547
|
1 |
1 |
wantarray ? : |
1573
|
3 |
6 |
if (CORE::ref $filter eq 'Regexp') { } |
|
2 |
4 |
elsif (not CORE::ref $filter) { } |
1581
|
2 |
7 |
wantarray ? : |
1589
|
1 |
2 |
wantarray ? : |
1594
|
3 |
1 |
wantarray ? : |
1600
|
2 |
4 |
wantarray ? : |
1633
|
9 |
1 |
if $_ > $max |
1643
|
0 |
10 |
if $_ < $min |
1656
|
1 |
2 |
wantarray ? : |
1662
|
1 |
3 |
wantarray ? : |
1668
|
0 |
0 |
wantarray ? : |
1674
|
0 |
1 |
wantarray ? : |
1710
|
8 |
0 |
defined $_ ? : |
1711
|
0 |
1 |
wantarray ? : |
1730
|
1 |
2 |
if (@_ == 1) { } |
|
1 |
1 |
elsif (CORE::ref $filter eq 'Regexp') { } |
|
0 |
1 |
elsif (not CORE::ref $filter) { } |
1789
|
3 |
2 |
wantarray ? : |
1797
|
2 |
2 |
wantarray ? : |
1804
|
3 |
4 |
defined $_[1] ? : |
1806
|
0 |
7 |
if $first < 0 |
1809
|
5 |
2 |
wantarray ? : |
1813
|
1 |
2 |
if (@_ == 1) { } |
1819
|
1 |
1 |
CORE::ref $arg eq 'Regexp' ? : |
1822
|
2 |
10 |
if &$filter($array->[$i]) |
1830
|
1 |
2 |
if (@_ == 1) { } |
1836
|
1 |
1 |
CORE::ref $arg eq 'Regexp' ? : |
1839
|
2 |
0 |
if &$filter($array->[$i]) |