| line |
true |
false |
branch |
|
37
|
0 |
0 |
unless $addr |
|
38
|
0 |
0 |
unless $addr =~ /\.\d+$/ |
|
59
|
0 |
0 |
if (length $str > $len and $len > 0) |
|
107
|
0 |
0 |
unless ref $self |
|
129
|
0 |
0 |
unless ($msgid) |
|
133
|
0 |
0 |
unless $$self{'fromaddr'} |
|
144
|
0 |
0 |
if exists $$self{$_} and defined $$self{$_} |
|
146
|
0 |
0 |
if exists $$self{'text'} and defined $$self{'text'} |
|
149
|
0 |
0 |
if exists $$self{$_} and defined $$self{$_} |
|
166
|
0 |
0 |
unless $$self{'msgid'} |
|
169
|
0 |
0 |
$$self{'toname'} ? : |
|
171
|
0 |
0 |
$$self{'subj'} ? : |
|
173
|
0 |
0 |
if ($$self{'area'}) { } |
|
179
|
0 |
0 |
if $frompoint != 0 |
|
180
|
0 |
0 |
if $topoint != 0 |
|
182
|
0 |
0 |
if $$self{'reply'} |
|
185
|
0 |
0 |
if $$self{'pid'} |
|
186
|
0 |
0 |
if $$self{'tid'} |
|
187
|
0 |
0 |
if $$self{'date'} |
|
191
|
0 |
0 |
$$self{'tearline'} ? : |
|
193
|
0 |
0 |
$$self{'origin'} ? : |
|
198
|
0 |
0 |
if $$self{'origin'} or $$self{'area'} |
|
227
|
1 |
0 |
unless ref $self |
|
239
|
0 |
1 |
if (exists $params{'_msgs'}) |
|
268
|
0 |
0 |
$$self{'password'} ? : |
|
289
|
0 |
0 |
unless $$self{'inbound'} =~ /$regexp/ |
|
295
|
0 |
0 |
if ($i >= scalar @repl) |
|
298
|
0 |
0 |
unless open PKT, '>', $filename |
|
299
|
0 |
0 |
if $FTN::Pkt::needs_binmode |
|
303
|
0 |
0 |
if ($i >= scalar @repl) |
|
306
|
0 |
0 |
unless rename $filename, $newname |