line |
!l |
l&&!r |
l&&r |
condition |
112
|
0 |
0 |
0 |
$self->print_header($fd) and print $fd "\n" |
217
|
0 |
0 |
0 |
$i++ < $nlines and $start-- |
257
|
0 |
0 |
0 |
@$body and $body->[0] =~ /^\s*$/ |
258
|
0 |
0 |
0 |
@$body and $body->[-1] =~ /^\s*$/ |
280
|
0 |
0 |
0 |
$subject =~ /\S+/ and not $subject =~ /Re:/i |
373
|
0 |
0 |
0 |
defined $arg{'Keep'} and ref $arg{'Keep'} eq 'ARRAY' |
380
|
0 |
0 |
0 |
defined $arg{'Exclude'} and ref $arg{'Exclude'} eq 'ARRAY' |
450
|
0 |
0 |
0 |
$smtp->mail($envelope) && $smtp->to(@addr) && $smtp->data(join('', @{$head->header;}, "\n", @{$self->body;})) |
489
|
0 |
0 |
0 |
ref $host and UNIVERSAL::isa($host, 'Net::NNTP') |
line |
l |
!l |
condition |
34
|
0 |
3 |
delete $opt{'FoldLength'} || 79 |
84
|
2 |
0 |
$self->{'mail_inet_body'} || [] |
97
|
6 |
0 |
$self->{'mail_inet_body'} ||= [] |
110
|
0 |
0 |
shift() || \*STDOUT |
122
|
0 |
0 |
shift() || \*STDOUT |
213
|
0 |
0 |
shift() || 10 |
279
|
0 |
0 |
$self->get('Subject') || '' |
286
|
0 |
0 |
$self->get('Reply-To') || $self->get('From') || $self->get('Return-Path') || '' |
300
|
0 |
0 |
$arg{'Indent'} || '>' |
309
|
0 |
0 |
substr($hash{'l'}, 0, 1) || '' |
311
|
0 |
0 |
$name || '' |
321
|
0 |
0 |
$ENV{'MAILADDRESSES'} || '' |
339
|
0 |
0 |
$self->get('References') || '' |
476
|
0 |
0 |
$self->get('Newsgroups') || '' |
539
|
0 |
0 |
eval {
do {
local $SIG{'__DIE__'};
(getpwuid $>)[6]
}
} || $ENV{'NAME'} || '' |