| line |
true |
false |
branch |
|
47
|
9 |
0 |
if @_ |
|
64
|
27 |
9 |
ref $p ? : |
|
100
|
153 |
16 |
ref $pattern eq 'Regexp' ? : |
|
101
|
12 |
157 |
if $arg{'group'} |
|
126
|
1 |
10 |
if (@- == 1) { } |
|
128
|
0 |
1 |
if $index |
|
133
|
9 |
7 |
if $index |
|
141
|
150 |
0 |
ref $_[0] eq 'HASH' ? : |
|
143
|
1 |
149 |
if $opt->{'strict'} |
|
182
|
9 |
0 |
ref $_[0] eq 'HASH' ? : |
|
185
|
7 |
2 |
is_inside($flag) ? : |
|
186
|
1 |
8 |
$opt->{'strict'} ? : |
|
227
|
359 |
0 |
ref $_[0] eq 'HASH' ? : |
|
229
|
359 |
0 |
$option->{'destructive'} ? : |
|
230
|
359 |
0 |
unless ($option->{'nosort'}) |
|
231
|
0 |
204 |
@$a > 2 ? : |
|
|
0 |
1362 |
unless $App::Greple::Regions::a->[0] <=> $App::Greple::Regions::b->[0] or $App::Greple::Regions::b->[1] <=> $App::Greple::Regions::a->[1] |
|
236
|
349 |
10 |
if @in |
|
240
|
202 |
1235 |
if ($out[-1][1] > $top->[0]) { } |
|
|
0 |
1235 |
elsif (not $nojoin and $out[-1][1] == $top->[0] and @$top < 3 || $out[-1][2] == $top->[2]) { } |
|
241
|
0 |
202 |
if $out[-1][1] < $top->[1] |
|
250
|
0 |
0 |
if $out[-1][1] < $top->[1] |
|
262
|
12 |
0 |
ref $_[0] eq 'HASH' ? : |
|
265
|
3 |
9 |
if $option->{'leave_empty'} |
|
275
|
2619 |
2803 |
if $border[-1] != $i |
|
278
|
104 |
5 |
if $border[-1] != length $_ |
|
283
|
0 |
0 |
if @_ < 2 |