use Mail::Sender;
use warnings;
use strict;

my $sender = new Mail::Sender
 (
	{
		from => 'bla@googlemail.com',
		smtp => 'smtp.googlemail.com',
		on_errors => 'die'
	}
 ) or die ($Mail::Sender::Error);

$sender->MailMsg
  (
	{
		to =>'bla@hotmail.com', 
		subject => 'love song',
		msg => "love is all you need tralalalala"
	}
  );

print "mail wurde verschickt";