| line |
true |
false |
branch |
|
126
|
0 |
1 |
unless defined $str and defined $search |
|
127
|
1 |
0 |
$global ? : |
|
129
|
1 |
0 |
@matches ? : |
|
134
|
0 |
2 |
unless defined $str and defined $pattern |
|
140
|
0 |
0 |
unless defined $str |
|
141
|
0 |
0 |
unless $count |
|
148
|
0 |
1 |
unless defined $text |
|
149
|
0 |
1 |
unless defined $pattern |
|
150
|
0 |
1 |
unless defined $replace |
|
151
|
1 |
0 |
unless defined $global |
|
153
|
0 |
1 |
if ($replace =~ /\$\d+/) { } |
|
158
|
0 |
0 |
$2 > $#$start || $2 == 0 ? : |
|
|
0 |
0 |
$1 ? : |
|
164
|
0 |
0 |
if ($global) { } |
|
172
|
1 |
0 |
if ($global) { } |
|
184
|
0 |
1 |
unless defined $str and defined $search |
|
191
|
0 |
3 |
unless defined $str |
|
198
|
0 |
3 |
if (defined $limit) { } |
|
199
|
0 |
0 |
defined $split ? : |
|
204
|
0 |
3 |
defined $split ? : |
|
214
|
0 |
2 |
if ($size < 0) { } |
|
233
|
2 |
0 |
if (defined $length) { } |
|
234
|
1 |
1 |
if (defined $replacement) { } |
|
249
|
0 |
2 |
unless defined $item |
|
294
|
0 |
0 |
$what eq 'each' ? : |
|
|
0 |
0 |
$what eq 'values' ? : |
|
|
0 |
0 |
$what eq 'keys' ? : |
|
307
|
0 |
1 |
@_ ? : |
|
317
|
0 |
0 |
unless ref $imp eq 'HASH' |
|
342
|
0 |
0 |
if (@_) |
|
388
|
0 |
1 |
@_ ? : |
|
393
|
1 |
0 |
unless @_ |
|
399
|
1 |
0 |
unless @_ |
|
416
|
53 |
0 |
defined $_ ? : |
|
417
|
11 |
0 |
defined $joint ? : |
|
424
|
0 |
0 |
if (ref $item eq 'HASH') { } |
|
|
0 |
0 |
elsif (blessed $item) { } |
|
428
|
0 |
0 |
$item->can($_) ? : |
|
436
|
0 |
0 |
defined $_ ? : |
|
441
|
0 |
2 |
unless @$list > 1 |
|
450
|
0 |
2 |
@fields ? : |
|
457
|
0 |
1 |
unless @$list > 1 |
|
466
|
0 |
1 |
@fields ? : |
|
478
|
1 |
0 |
ref $_ eq 'ARRAY' ? : |
|
484
|
2 |
0 |
ref $_ eq 'ARRAY' ? : |
|
490
|
0 |
1 |
unless defined $to |
|
491
|
0 |
1 |
if $from < 0 |
|
492
|
0 |
1 |
if $to < 0 |
|
498
|
1 |
0 |
if (@replace) { } |
|
|
0 |
0 |
elsif (defined $length) { } |
|
|
0 |
0 |
elsif (defined $offset) { } |
|
501
|
1 |
0 |
if @replace == 1 and ref $replace[0] eq 'ARRAY' |
|
551
|
0 |
1 |
unless defined $pad |
|
552
|
0 |
1 |
if $pad =~ /^\d+$/ |
|
556
|
0 |
1 |
unless defined $text |
|
564
|
0 |
1 |
unless defined $format |
|
568
|
0 |
1 |
unless defined $text |
|
575
|
0 |
1 |
unless defined $len |
|
576
|
1 |
0 |
unless defined $char |
|
580
|
0 |
1 |
if ($len < $lchar) |
|
587
|
0 |
1 |
if length $text <= $len |
|
594
|
0 |
1 |
unless defined $iter and length $iter |
|
598
|
0 |
1 |
unless defined $text |
|
605
|
0 |
1 |
unless defined $search |
|
606
|
0 |
1 |
unless defined $replace |
|
610
|
0 |
1 |
unless defined $text |
|
621
|
0 |
1 |
unless defined $text |