my $outlook = new Mail::Outlook();

 

  # create a message for sending
  my $message = $outlook->create();
  $message->To(' ');
  $message->Cc(' ');
  $message->Bcc(' ');
  $message->Subject(' ');
  $message->Body(' ');
  # attachments are appended
  $message->Attach("$home_dir\\test.pdf");      # so multiple calls are allowed
  $message->display;