Email::Simple; use Email::Simple::Creator; use Data::Recursive::Encode; use Encode; use Email::Sender::Transport::SMTP::TLS; use Skype::Any; my $sender = Email::Sender::Transport::SMTP::TLS->new( host => 'smtp.gmail.com', port => 587, username => 'example@gmail.com', password => 'pa33w0rd', helo => 'example.com', );