| line |
true |
false |
branch |
|
42
|
0 |
0 |
unless $self->SUPER::init(@_)
|
|
73
|
0 |
0 |
unless $self->_ensure_envelope_headers($entity)
|
|
78
|
0 |
0 |
ref $recipient_cert eq 'ARRAY' ? :
|
|
91
|
0 |
0 |
if $@
|
|
98
|
0 |
0 |
if $@
|
|
99
|
0 |
0 |
unless (defined $encrypted and length $encrypted)
|
|
132
|
0 |
0 |
unless $self->_ensure_envelope_headers($entity)
|
|
136
|
0 |
0 |
unless $self->_load_private_key($smime, $opts)
|
|
145
|
0 |
0 |
if $@
|
|
146
|
0 |
0 |
unless (defined $signed and length $signed)
|
|
175
|
0 |
0 |
unless $opts->{'RecipientCert'}
|
|
177
|
0 |
0 |
unless $self->_ensure_envelope_headers($entity)
|
|
181
|
0 |
0 |
unless $self->_load_private_key($smime, $opts)
|
|
188
|
0 |
0 |
ref $opts->{'RecipientCert'} eq 'ARRAY' ? :
|
|
199
|
0 |
0 |
if $@
|
|
209
|
0 |
0 |
if $@
|
|
210
|
0 |
0 |
unless (defined $signed and length $signed)
|
|
221
|
0 |
0 |
if $@
|
|
222
|
0 |
0 |
unless (defined $result and length $result)
|
|
247
|
0 |
0 |
if ($pos < 0)
|
|
260
|
0 |
0 |
if ($line =~ /^[ \t]/) { }
|
|
|
0 |
0 |
elsif ($line =~ /^([\x21-\x39\x3B-\x7E]+):\s*(.*?)\015\012$/) { }
|
|
263
|
0 |
0 |
if length $cur_name
|
|
267
|
0 |
0 |
if length $cur_name
|
|
271
|
0 |
0 |
if length $cur_name
|
|
312
|
0 |
0 |
unless ($mail->{'_headers'}->exists("Date"))
|
|
315
|
0 |
0 |
unless $mail->{'_headers'}->init_header("Date", $mail->_format_date)
|
|
318
|
0 |
0 |
unless ($mail->{'_headers'}->exists("Message-ID"))
|
|
322
|
0 |
0 |
unless $mail->{'_headers'}->message_id({"generate", 1, "domain", $mail->_default_domain})
|
|
337
|
0 |
0 |
unless defined $source and length $source
|
|
343
|
0 |
0 |
if $@
|
|
359
|
0 |
0 |
unless (defined $cert_source and length $cert_source)
|
|
364
|
0 |
0 |
unless (defined $key_source and length $key_source)
|
|
376
|
0 |
0 |
if (defined $password_src)
|
|
378
|
0 |
0 |
if (ref $password_src eq 'CODE') { }
|
|
382
|
0 |
0 |
if $@
|
|
391
|
0 |
0 |
if (defined $password) { }
|
|
399
|
0 |
0 |
if $@
|
|
410
|
0 |
0 |
unless $self->_load_class("Crypt::SMIME")
|
|
415
|
0 |
0 |
if $@
|
|
427
|
0 |
0 |
unless (defined $source)
|
|
433
|
0 |
0 |
if $source =~ /-----BEGIN/
|
|
436
|
0 |
0 |
unless (-f $source)
|
|
441
|
0 |
0 |
unless (-r $source)
|
|
446
|
0 |
0 |
unless open my $fh, "<", $source
|
|
452
|
0 |
0 |
unless (defined $pem and $pem =~ /-----BEGIN/)
|
|
469
|
0 |
0 |
unless (defined $mail)
|
|
474
|
0 |
0 |
unless ($mail->can("as_entity"))
|