with use authenticated flow, tail_n_mail generates errors

[Johndeydier]

following a switch to authenticated flow, tail_n_mail generated errors :
Failed to send mail (from): 5.7.3 STARTTLS is required to send mail

I modified the code to make it work again

1/ No SASL mechanism found
at /usr/share/perl5/vendor_perl/Authen/SASL.pm line 77.
at /usr/share/perl5/Net/SMTP.pm line 165.
=> SOLUTION / comment out the following lines
## Attempt to authenticate

if (not $smtp->auth($mailuser, $mailpass)) {

die 'Failed to authenticate to mail server: ' . $smtp->message;

}

2/ Failed to send mail (from): 5.7.3 STARTTLS is required to send mail
=> SOLUTION / add the following 2 lines
$smtp->starttls(); # make sure to install IO::Socket::SSL
$smtp->auth($mailuser, $mailpass); # make sure to install Authen::SASL

Prepare to send the message

$smtp->starttls(); # make sure to install IO::Socket::SSL
$smtp->auth($mailuser, $mailpass); # make sure to install Authen::SASL
$smtp->mail($from_addr) or die 'Failed to send mail (from): ' . $smtp->message;
$smtp->to($emails)      or die 'Failed to send mail (to): '   . $smtp->message;
$smtp->data()           or die 'Failed to send mail (data): ' . $smtp->message;

I haven't changed anything for this :
3/ Use of uninitialized value in printf at /usr/bin/tail_n_mail line 3789.
==> of %s is not valued
[1] From D, F, C, I, G, E, L, B, A, J, K, H(between lines 1 of and 2,284 of , occurs 24,677 times) (21,709, 582, 546, 474, 407, 403, 400, 119, 23, 6, 6, 2)

printf '(between lines %s of %s and %s of %s, occurs %s times)',
$earliest->{line}, $fab{ $earliest->{file} },
$latest->{line}, $fab{ $latest->{file} },
$pcount;