Select Code to Download

  my $namespace = $outlook->GetNamespace("MAPI");
  my $folder = $namespace->GetDefaultFolder(olFolderInbox);
...
  my $firstmail = $mailitems->GetFirst;
  my $subject = $firstmail->Subject;
  my $sendername = $firstmail->SenderName; #Outlook security prompt

#!/usr/bin/perl
use strict;
...
  $mw->destroy;
}