line |
!l |
l&&!r |
l&&r |
condition |
141
|
6 |
0 |
4 |
defined $file and -r $file
|
|
6 |
0 |
4 |
defined $file and -r $file and not $self->{'-bits'}
|
143
|
6 |
4 |
0 |
defined $file and not defined $self->get('-width')
|
226
|
12 |
4 |
0 |
$field eq '-hotx' and $val < $UNSET || $val >= $self->get('-width')
|
228
|
12 |
4 |
0 |
$field eq '-hoty' and $val < $UNSET || $val >= $self->get('-height')
|
269
|
0 |
0 |
0 |
$val =~ /^\d+$/ and $val >= 1
|
|
0 |
0 |
0 |
$val =~ /^#(\d+)$/ and hex $1
|
301
|
0 |
0 |
1 |
ref $obj and $obj->isa('Image::Xbm')
|
336
|
0 |
0 |
0 |
$hotch and $x == $hotx
|
|
0 |
0 |
0 |
$hotch and $x == $hotx and $y == $hoty
|
395
|
0 |
0 |
4 |
defined $width and defined $height
|
452
|
4 |
0 |
0 |
$hotx > $UNSET and $hoty > $UNSET
|
line |
l |
!l&&r |
!l&&!r |
condition |
44
|
0 |
16 |
0 |
ref $self || $self
|
52
|
0 |
0 |
0 |
ref $self || $self
|
73
|
0 |
4 |
0 |
ref $self || $self
|
101
|
0 |
0 |
120 |
$c eq $sethotch or $c eq $unsethotch
|
115
|
1 |
9 |
0 |
ref $self || $self
|
157
|
0 |
1 |
0 |
ref $self || $self
|
196
|
323 |
4 |
0 |
ref $self || $self
|
217
|
16 |
0 |
0 |
ref $self || $self
|
224
|
0 |
0 |
16 |
$field eq '-bits' or $field eq '-width'
|
|
0 |
0 |
16 |
$field eq '-bits' or $field eq '-width' or $field eq '-height'
|
226
|
0 |
0 |
4 |
$val < $UNSET || $val >= $self->get('-width')
|
228
|
0 |
0 |
4 |
$val < $UNSET || $val >= $self->get('-height')
|
269
|
0 |
0 |
0 |
$val =~ /^\d+$/ and $val >= 1 or lc $val eq 'black'
|
|
0 |
0 |
0 |
$val =~ /^\d+$/ and $val >= 1 or lc $val eq 'black' or $val =~ /^#(\d+)$/ and hex $1
|
298
|
1 |
0 |
0 |
ref $self || $self
|
305
|
0 |
0 |
1 |
$self->get('-width') != $obj->get('-width') or $self->get('-height') != $obj->get('-height')
|
|
0 |
0 |
1 |
$self->get('-width') != $obj->get('-width') or $self->get('-height') != $obj->get('-height') or $self->get('-bits') ne $obj->get('-bits')
|
366
|
0 |
4 |
0 |
shift() || $self->get('-file')
|
432
|
4 |
0 |
0 |
shift() || $self->get('-file')
|