| line |
true |
false |
branch |
|
92
|
0 |
2 |
if ($color) { } |
|
93
|
0 |
0 |
unless UNIVERSAL::isa($color, 'Imager::Color') |
|
97
|
0 |
2 |
unless defined $color |
|
104
|
4 |
4 |
if ($original{$_}) { } |
|
106
|
0 |
4 |
if ($crop->{$_} >= $original{$_}) |
|
112
|
0 |
4 |
if ($crop->{$_} <= $original{$_}) |
|
118
|
0 |
2 |
if $bordered == 4 |
|
119
|
2 |
0 |
if ($detect and ref $detect eq 'HASH') { } |
|
122
|
0 |
0 |
unless my $rv = $img->crop(%{$crop;}) |
|
131
|
0 |
2 |
$image->getchannels < 3 ? : |
|
134
|
2 |
36 |
if $outline |
|
136
|
0 |
2 |
unless $outline |
|
138
|
2 |
0 |
if $outline |
|
142
|
2 |
30 |
if $outline |
|
145
|
2 |
0 |
if ($outline) |
|
146
|
0 |
2 |
if not defined $left or $pos < $left |
|
147
|
0 |
2 |
if not defined $right or $rpos > $right |
|
151
|
30 |
0 |
if ($outline) |
|
152
|
0 |
30 |
if not defined $left or $pos < $left |
|
153
|
0 |
30 |
if not defined $right or $rpos > $right |
|
156
|
2 |
0 |
if defined $right |
|
157
|
2 |
0 |
if defined $bottom |
|
169
|
34 |
6404 |
if $outline |
|
175
|
34 |
1122 |
if $outline |
|
184
|
14 |
22740 |
if ($scanned->[$_] < $range->[$_][0] or $scanned->[$_] > $range->[$_][1]) |