| line | % | coverage | branch |
|---|
| 182 | 100 | T | F | if @args |
| 214 | 50 | T | F | if length $_ == 0 and $paraborder |
| 217 | 100 | T | F | if $lead eq "#" |
| 221 | 100 | T | F | if (defined $name and $name =~ /^\S+?$/) { } |
| 100 | T | F | elsif (/^\s(\s*\S.*)$/) { } |
| 100 | T | F | elsif (length $_ == 0 or $expect_pgp_sig and $armor =~ /^-----BEGIN PGP SIGNATURE-----[\r\t ]*$/) { } |
| 100 | T | F | elsif ($armor =~ /^-----BEGIN PGP SIGNED MESSAGE-----[\r\t ]*$/) { } |
| 223 | 50 | T | F | if ($lead eq "-") |
| 226 | 50 | T | F | if (exists $self->{$name}) { } |
| 227 | 0 | T | F | unless ($$self->{'allow_duplicate'}) |
| 230 | 0 | T | F | if ($$self->{'keep_duplicate'}) { } |
| 231 | 0 | T | F | if (ref $self->{$name} ne 'ARRAY') { } |
| 248 | 50 | T | F | unless (defined $cf) |
| 251 | 100 | T | F | if ($line =~ /^\.+$/) |
| 257 | 100 | T | F | if ($expect_pgp_sig) |
| 260 | 50 | T | F | unless (length $_) |
| 265 | 50 | T | F | unless (/^-----BEGIN PGP SIGNATURE-----[\r\t ]*$/) |
| 272 | 100 | T | F | if /^-----END PGP SIGNATURE-----[\r\t ]*$/ |
| 274 | 50 | T | F | unless (defined $_) |
| 285 | 100 | T | F | if ($$self->{'allow_pgp'} and not $parabody) { } |
| 288 | 100 | T | F | if /^\s*$/ |
| 299 | 100 | T | F | if ($expect_pgp_sig and not $$self->{'is_pgp_signed'}) |
| 322 | 0 | T | F | if $key =~ /^X[SBC]*-\Q$name\E$/i |
| 336 | 0 | T | F | if defined $key |
| 359 | 50 | T | F | if (@{$$self->{'out_order'};}) { } |
| 364 | 100 | T | F | if (defined $imp->{$a} and defined $imp->{$b}) { } |
| 100 | T | F | elsif (defined $imp->{$a}) { } |
| 100 | T | F | elsif (defined $imp->{$b}) { } |
| 379 | 50 | T | F | if (exists $self->{$key}) |
| 382 | 100 | T | F | if $$self->{'drop_empty'} and not $value =~ /\S/ |
| 387 | 100 | T | F | if length $first_line |
| 391 | 100 | T | F | if (length $_ == 0 or /^\.+$/) { } |
| 398 | 100 | T | F | if ($fh) |
| 399 | 50 | T | F | unless print {$fh;} $kv |
| 402 | 100 | T | F | if defined wantarray |
| 439 | 0 | T | F | if ($v ne $self->{$f}) |
| 448 | 0 | T | F | if ($sep & 6) |
| 453 | 0 | T | F | if ($sep & 2) |