msgxtractr: Read Outlook '.msg' Files

msg_fields <- list(
  CreationTime = "_3007",
  LastModificationTime = "_3008",
  LastModifierName = "_3FFA",
  OriginalSenderEmailAddress = "_0067",
  MessageBodyHtml = "_1013",
  MessageClass = "_001A",
  Subject = "_0037",
  ReceivedByName = "_0040",
  ReceivedRepresentingName = "_0044",
  SentRepresentingName = "_0071",
  SentRepresentingEmailAddress = "_0065",
  SentRepresentingAddressType = "_0064",
  SenderAddressType = "_0C1E",
  SenderEmailAddress = "_0C1F",
  SenderName = "_0C1A",
  ConversationTopic = "_0070",
  ReceivedRepresentingEmailAddress = "_0078",
  ReceivedByEmailAddress = "_0076",
  ReceivedByAddressType = "_0075",
  ReceivedRepresentingAddressType = "_0077",
  TransportMessageHeaders = "_007D",
  DisplayName = "_0E01",
  DisplayBcc = "_0E02",
  DisplayCc = "_0E03",
  DisplayTo = "_0E04",
  NormalizedSubject = "_0E1D",
  OriginalMessageId = "_1046",
  InternetMessageId = "_1035",
  MessageBody = "_1000",
  AttachExtension = "_3703",
  AttachFilename = "_3704",
  AttachLongFilename = "_3707",
  AttachMIME = "_370E",
  AttachContentId = "_3712",
  AttachContent = "_3701",
  DisplayName = "_3001",
  AddressType = "_3002",
  EmailAddress = "_3003"
)