line |
true |
false |
branch |
1243
|
1 |
1 |
$_[2] ? : |
1255
|
1 |
1 |
if @_ == 2 |
1262
|
2 |
3 |
if @_ == 2 |
1273
|
1 |
1 |
@ms ? : |
1274
|
1 |
1 |
@ms ? : |
1275
|
1 |
1 |
wantarray ? : |
1277
|
3 |
1 |
$_[0] =~ s/$_[1]/$_[2]/ ? : |
1278
|
0 |
4 |
if (Want::want('LIST')) { } |
|
2 |
2 |
elsif (Want::want('BOOL')) { } |
|
1 |
1 |
elsif (Want::want('SCALAR')) { } |
1308
|
4 |
1 |
$_[0] < $_[1] ? : |
1309
|
1 |
4 |
wantarray ? : |
1312
|
1 |
1 |
wantarray ? : |
1316
|
1 |
1 |
wantarray ? : |
1343
|
2 |
0 |
if $_[0] |
1349
|
0 |
1 |
unless $_[0] |
1371
|
0 |
25 |
unless defined $size |
1372
|
25 |
0 |
defined $size ? : |
1373
|
4 |
21 |
defined $char ? : |
1375
|
0 |
25 |
if (CORE::length $char > 1) |
1383
|
5 |
20 |
if $size <= $len |
1398
|
6 |
3 |
unless defined $trim_charset |
1407
|
6 |
3 |
unless defined $trim_charset |
1433
|
5 |
1 |
if &Scalar::Util::looks_like_number($_[0]) |
1434
|
5 |
1 |
if &Scalar::Util::looks_like_number($_[0]) |
1435
|
6 |
0 |
if &Scalar::Util::looks_like_number($_[0]) |
1437
|
3 |
1 |
if &Scalar::Util::looks_like_number($_[0]) |
1460
|
0 |
0 |
wantarray ? : |
1469
|
1 |
2 |
wantarray ? : |
1473
|
1 |
1 |
wantarray ? : |
1530
|
2 |
2 |
wantarray ? : |
1543
|
0 |
2 |
if grep {CORE::ref $_;} CORE::values %{$_[0];} |
1545
|
1 |
1 |
wantarray ? : |
1571
|
3 |
6 |
if (CORE::ref $filter eq 'Regexp') { } |
|
2 |
4 |
elsif (not CORE::ref $filter) { } |
1579
|
2 |
7 |
wantarray ? : |
1587
|
1 |
2 |
wantarray ? : |
1592
|
3 |
1 |
wantarray ? : |
1598
|
2 |
4 |
wantarray ? : |
1631
|
9 |
1 |
if $_ > $max |
1641
|
0 |
10 |
if $_ < $min |
1654
|
1 |
2 |
wantarray ? : |
1660
|
1 |
3 |
wantarray ? : |
1666
|
0 |
0 |
wantarray ? : |
1672
|
0 |
1 |
wantarray ? : |
1704
|
5 |
3 |
$uniq{$_}++ == 0 ? : |
1706
|
0 |
1 |
wantarray ? : |
1725
|
1 |
2 |
if (@_ == 1) { } |
|
1 |
1 |
elsif (CORE::ref $filter eq 'Regexp') { } |
|
0 |
1 |
elsif (not CORE::ref $filter) { } |
1784
|
3 |
2 |
wantarray ? : |
1792
|
2 |
2 |
wantarray ? : |
1799
|
3 |
4 |
defined $_[1] ? : |
1801
|
0 |
7 |
if $first < 0 |
1804
|
5 |
2 |
wantarray ? : |
1808
|
1 |
2 |
if (@_ == 1) { } |
1814
|
1 |
1 |
CORE::ref $arg eq 'Regexp' ? : |
1817
|
2 |
10 |
if &$filter($array->[$i]) |
1825
|
1 |
2 |
if (@_ == 1) { } |
1831
|
1 |
1 |
CORE::ref $arg eq 'Regexp' ? : |
1834
|
2 |
0 |
if &$filter($array->[$i]) |