| line |
true |
false |
branch |
|
57
|
2 |
0 |
if (defined $kludge and $kludge ne '') { }
|
|
81
|
3 |
4 |
$ftn_ready ? :
|
|
174
|
0 |
3 |
unless (%opts)
|
|
178
|
0 |
3 |
unless ($opts{'Address'})
|
|
182
|
0 |
3 |
unless ($opts{'Message'})
|
|
197
|
0 |
3 |
unless ($self->set_address($opts{'Address'}))
|
|
201
|
0 |
3 |
unless ($self->set_message($opts{'Message'}))
|
|
215
|
0 |
4 |
unless (defined $kludge and $kludge ne '')
|
|
229
|
0 |
3 |
unless (defined $text and $text ne '')
|
|
243
|
0 |
11 |
unless (grep /^$type$/, keys %{$$self{'idx'};})
|
|
248
|
11 |
0 |
unless defined $idx
|
|
250
|
11 |
0 |
if defined $PREDEFINED_INDEX{$idx}
|
|
252
|
0 |
11 |
unless ($idx =~ /^-?\d+$/)
|
|
257
|
0 |
11 |
unless (defined $self->{'idx'}{$type}[$idx])
|
|
298
|
2 |
0 |
if (defined $kludge and defined $idx) { }
|
|
340
|
2 |
0 |
if (defined $kludge and defined $idx) { }
|
|
374
|
6 |
3 |
if $c->isa('FTN::Crypt::Msg::KludgeChunk')
|
|
404
|
0 |
4 |
unless ($addr)
|
|
441
|
0 |
4 |
unless ($self->{'addr'})
|
|
480
|
4 |
0 |
if (defined $idx) { }
|
|
514
|
0 |
0 |
if $c->isa('FTN::Crypt::Msg::TextChunk')
|
|
553
|
3 |
0 |
if (defined $text and defined $idx) { }
|
|
593
|
6 |
3 |
if ($c->isa('FTN::Crypt::Msg::KludgeChunk')) { }
|
|
|
3 |
0 |
elsif ($c->isa('FTN::Crypt::Msg::TextChunk')) { }
|
|
644
|
29 |
23 |
if ($l =~ s/^$SOH//) { }
|
|
645
|
8 |
21 |
unless (defined $is_kludge and $is_kludge)
|
|
651
|
4 |
19 |
if (not defined $is_kludge or $is_kludge)
|