use Mail::Sender;
$smtp = 'smtp_server_name';
$filename = 'document.pdf';
$sender  = new Mail::Sender { smtp    => $smtp };
$success = $sender->MailFile({
  from    => 'rv@petamem.com',
  to      => 'roman.vasicek@email.cz',
  subject => "subject text",
  msg     => ' body ',
  file    => "$filename"
});
if (ref $success) {
  print "OK.\n";
} else {
  print "Error: $Mail::Sender::Error\n";
}