with the minimal exemple

#!/usr/bin/perl -w

use MIME::Lite;
use strict;
use warnings;


my$msg = MIME::Lite->new ( 
    From     =>  'fakessh@fakessh.eu',
    To       =>  'john.swilting@wanadoo.fr',
    Subject  =>  'test'
    );
$msg->send('tls','domaine.tld',Hello => 'domaine.tld', Port => "587", 
+User => "john" , Password => "azerty" , Debug => 4 );
[download]

attempting to issue an email fails . I quote the response of perl -d

~]# perl -d mailtomail3.pl 

Loading DB routines from perl5db.pl version 1.28
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(mailtomail3.pl:8):       my$msg = MIME::Lite->new ( 
main::(mailtomail3.pl:9):           From     =>  'fakessh@fakessh.eu',
main::(mailtomail3.pl:10):          To       =>  'john.swilting@wanado
+o.fr',
main::(mailtomail3.pl:11):          Subject  =>  'test'
main::(mailtomail3.pl:12):          );
  DB<1> c
SMTP mail() command failed: 
MIME::Lite::SMTP::TLS=HASH(0x875a62c)
 at /usr/lib/perl5/vendor_perl/5.8.8/MIME/Lite.pm line 2941
        MIME::Lite::send_by_tls('MIME::Lite=HASH(0x845e204)', 'mail.fa
+kessh.eu', 'Hello', 'fakessh.eu', 'Port', 587, 'User', 'fakessh', 'Pa
+ssword', ...) called at /usr/lib/perl5/vendor_perl/5.8.8/MIME/Lite.pm
+ line 2581
        MIME::Lite::send('MIME::Lite=HASH(0x845e204)', 'tls', 'mail.fa
+kessh.eu', 'Hello', 'fakessh.eu', 'Port', 587, 'User', 'fakessh', ...
+) called at mailtomail3.pl line 13
Debugged program terminated.  Use q to quit or R to restart,
  use o inhibit_exit to avoid stopping after program termination,
  h q, h R or h o to get additional info.  
  DB<1> q
[download]

is the mail command that happens with errors