| line |
true |
false |
branch |
|
153
|
1 |
7 |
if (exists $opts{$att}) |
|
157
|
0 |
1 |
if %opts |
|
161
|
1 |
0 |
@{$self->{'cat'};} ? : |
|
|
1 |
0 |
unless defined $self->{'autocat'} |
|
176
|
0 |
15 |
if (length $value > $max) |
|
182
|
0 |
0 |
if ($self->{'truncate'} > $lvl) { } |
|
197
|
0 |
6 |
if defined $self->{'_cat'}{$value} |
|
198
|
0 |
6 |
if (@{$self->{'cat'};} == 16) |
|
223
|
1 |
1 |
if ($self->{'_cat'}{$cat}) { } |
|
|
1 |
0 |
elsif ($self->{'autocat'}) { } |
|
233
|
0 |
0 |
if ($f1 eq '' and $f2 eq '' and $note eq '') |
|
255
|
0 |
1 |
if $catcode |
|
283
|
0 |
1 |
unless (@{$self->{'_data'};}) |
|
301
|
0 |
1 |
unless lc $Palm::ListDB::Writer::a->[1] cmp lc $Palm::ListDB::Writer::b->[1] or lc $Palm::ListDB::Writer::a->[2] cmp lc $Palm::ListDB::Writer::b->[2] |
|
309
|
0 |
1 |
unless open $fh, ">$file" |
|
343
|
1 |
0 |
$self->{'backup'} ? : |
|
|
0 |
1 |
$self->{'private'} ? : |
|
351
|
0 |
1 |
unless length $hdr == 78 |
|
365
|
2 |
0 |
if $field1 ne '' |
|
366
|
2 |
0 |
if $field2 ne '' |
|
367
|
2 |
0 |
if $note ne '' |
|
368
|
0 |
2 |
if $len == 3 |
|
396
|
10 |
6 |
unless $self->{'cat'}[$_] |
|
397
|
5 |
11 |
$_ && $_ < $numcats ? : |
|
402
|
0 |
1 |
$self->{'readonly'} ? : |
|
405
|
0 |
1 |
unless length $appinfo == 512 |
|
422
|
6 |
0 |
if ($len) { } |
|
431
|
0 |
6 |
unless length $_ |