| line |
!l |
l&&!r |
l&&r |
condition |
|
141
|
0 |
1 |
0 |
length $bytes >= 4 and do {
my($width, $height) = unpack('nn', $bytes);
-s $fh == 775 + $width * $height
} |
|
285
|
0 |
0 |
0 |
open $fh, '>', $filename and $text_mode{$file_format} || binmode($fh) |
|
|
0 |
0 |
0 |
open $fh, '>', $filename and $text_mode{$file_format} || binmode($fh) and print $fh $data |
|
|
0 |
0 |
0 |
open $fh, '>', $filename and $text_mode{$file_format} || binmode($fh) and print $fh $data and close $fh |
|
374
|
0 |
0 |
0 |
$xw > 1 and not $xw & 1 |
|
|
0 |
0 |
0 |
$xw > 1 and not $xw & 1 and $yw > 1 |
|
|
0 |
0 |
0 |
$xw > 1 and not $xw & 1 and $yw > 1 and not $yw & 1 |
|
461
|
0 |
0 |
0 |
$gd->can('colorExact') and $gd->colorExact(@rgb) != -1 |
|
512
|
0 |
0 |
0 |
$gd->can('colorExact') and (my $index = $gd->colorExact(@rgb)) != -1 |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
63
|
0 |
0 |
0 |
'GD::Image'->new($width, $height, $truecolor) || croak('Cannot create GD') |
|
141
|
0 |
0 |
1 |
$bytes =~ /^\xFF[\xFF\xFE]/ or length $bytes >= 4 and do {
my($width, $height) = unpack('nn', $bytes);
-s $fh == 775 + $width * $height
} |
|
175
|
1 |
1 |
0 |
$method ||= "newFrom\u$file_format" |
|
179
|
0 |
0 |
2 |
$file_format eq 'xpm' or not seek($fh, $filepos, 0) |
|
285
|
0 |
0 |
0 |
$text_mode{$file_format} || binmode($fh) |
|
338
|
0 |
0 |
0 |
$x2 < 0 or $y2 < 0 |
|
352
|
0 |
0 |
0 |
$fill || $y1 == $y2 |
|
374
|
0 |
0 |
0 |
$gd->isa('GD::SVG::Image') or $xw > 1 and not $xw & 1 and $yw > 1 and not $yw & 1 |
|
396
|
0 |
0 |
0 |
$x1 == $x2 or $y1 == $y2 |