line |
true |
false |
branch |
46
|
1 |
92 |
unless exists $param->{'pattern'} |
55
|
0 |
22 |
unless defined $pattern |
57
|
2 |
20 |
if (ref $fill eq 'ARRAY') { } |
65
|
1 |
21 |
if ($cur_dim[1] > $new_dim[1]) { } |
|
2 |
19 |
elsif ($cur_dim[1] < $new_dim[1]) { } |
83
|
0 |
12 |
unless defined $pattern |
85
|
2 |
10 |
if (ref $fill eq 'ARRAY') { } |
94
|
1 |
11 |
if ($cur_dim[0] > $new_dim[0]) { } |
|
1 |
10 |
elsif ($cur_dim[0] < $new_dim[0]) { } |
118
|
1 |
1 |
if (defined $width) { } |
119
|
0 |
1 |
if not &looks_like_number($width) or $width < 1 |
126
|
1 |
1 |
if (defined $char and length $char) { } |
152
|
9 |
37 |
if $p->[0] < 0 |
153
|
9 |
37 |
if $p->[1] < 0 |
154
|
0 |
45 |
if ($p->[0] < 0 or $p->[0] >= $cols or $p->[1] < 0 or $p->[1] >= $rows) |
159
|
1 |
21 |
if $p1->[0] > $p2->[0] |
160
|
0 |
22 |
if $p1->[1] > $p2->[1] |
168
|
0 |
17 |
unless ($p2) |
173
|
1 |
16 |
unless defined $p1 |
175
|
15 |
1 |
unless ($p2->[0] == 0 or $p2->[1] == 0) |
188
|
5 |
1 |
unless (defined $pattern) |
190
|
0 |
5 |
unless defined $pattern |
208
|
4 |
1 |
unless $p->[0] == 0 |
209
|
4 |
1 |
unless $p->[0] == $max_col |
210
|
4 |
1 |
unless $p->[1] == 0 |
211
|
4 |
1 |
unless $p->[1] == $max_row |
218
|
3 |
2 |
unless $p->[0] == 0 |
219
|
3 |
2 |
unless $p->[0] == $max_col |
220
|
3 |
2 |
unless $p->[1] == 0 |
221
|
3 |
2 |
unless $p->[1] == $max_row |
222
|
2 |
3 |
unless $p->[0] == 0 or $p->[1] == 0 |
223
|
2 |
3 |
unless $p->[0] == 0 or $p->[1] == $max_row |
226
|
2 |
3 |
unless $p->[0] == $max_col or $p->[1] == 0 |
229
|
2 |
3 |
unless $p->[0] == $max_col or $p->[1] == $max_row |
240
|
0 |
2 |
if ($p->[0] < 0 or $p->[0] > $max_col or $p->[1] < 0 or $p->[1] > $max_row) |
249
|
10 |
28 |
if ($$ref[$p->[1]][$p->[0]] eq $replace) |
269
|
6 |
0 |
if @$pat > 1 |
286
|
2 |
3 |
if ($reduce_col) |
291
|
2 |
3 |
if ($reduce_row) |
304
|
11 |
0 |
if @$pat > 1 |
310
|
4 |
0 |
if (defined $fill) { } |
311
|
0 |
4 |
if ref $fill |
318
|
2 |
2 |
if ($do_crop) { } |
320
|
1 |
1 |
if ($cols > $rows) { } |
|
1 |
0 |
elsif ($cols < $rows) { } |
327
|
1 |
1 |
if ($cols > $rows) { } |
|
1 |
0 |
elsif ($cols < $rows) { } |
363
|
0 |
4 |
unless substr $rep->[$r], $-[0], $+[0] - $-[0] |
370
|
0 |
6 |
if not defined $cols && &looks_like_number($cols) or $cols < 1 |
375
|
4 |
2 |
if (defined $rows) { } |
376
|
0 |
4 |
if not &looks_like_number($rows) or $rows < 1 |
383
|
4 |
2 |
if ($cols > 1) |
388
|
4 |
2 |
if ($rows > 1) |
397
|
0 |
4 |
if $p->[0] < 0 |
398
|
0 |
4 |
if $p->[1] < 0 |
399
|
0 |
3 |
if ($p->[0] < 0 or $p->[0] >= $cols or $p->[1] < 0 or $p->[1] >= $rows) |
415
|
2 |
17 |
if ($rotate_by == 0) { } |
|
5 |
12 |
elsif ($rotate_by == 2) { } |
423
|
6 |
6 |
if ($rotate_by == 1) { } |
|
6 |
0 |
elsif ($rotate_by == 3) { } |
427
|
6 |
0 |
if ($rows > 1) |
438
|
6 |
0 |
if ($rows > 1) |
469
|
2 |
1 |
if ($to_fill > 0) |
472
|
15 |
5 |
if (rand() < $to_fill / $total) |