"Can't get it to work" does not help us or you try to figure out what the problem is. What isn't working? What error messages are you getting? Have you tried turning on debugging?

It looks like you aren't checking the return codes from the methods. By default, Mail::Sender functions return undef on failures. It supports die'ing instead on errors which saves having to check every method. Also, it supports printing out debugging messages to a file or STDOUT.

my $sender = Mail::Sender->new({ on_errors => 'die', 
                                 debug => \*STDOUT });
[download]