~]# 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@wanadoo.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.fakessh.eu', 'Hello', 'fakessh.eu', 'Port', 587, 'User', 'fakessh', 'Password', ...) called at /usr/lib/perl5/vendor_perl/5.8.8/MIME/Lite.pm line 2581
        MIME::Lite::send('MIME::Lite=HASH(0x845e204)', 'tls', 'mail.fakessh.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