In crazycapivara/imapr: An R Interface to IMAP

knitr::opts_chunk$set(echo = TRUE)
devtools::load_all()
response <- readRDS("tmp/data/response-list.rds")
search_all <- readRDS("tmp/data/response-search_all.rds")
header <- readRDS("tmp/data/response-fetch_92.rds") %>% 
  sub("[e-mail]", "[e-mail]", .) %>%
  sub("@travis-ci.org", "@stuff.hi", .)

imapr performs IMAP queries via curl.

Builds

master

develop

Installation

require("devtools")

install_github("crazycapivara/imapr")

Usage

library(imapr)

host <- "imaps://imap.gmail.com"

imap <- IMAP(host) %>% user("your_username", "your_password")
imap[c("url", "path")]

List and select mailboxes

response <- imap %>% LIST() %>% execute()

response %>% cat()

imap %>% SELECT("INBOX") %>% .[c("url", "path")]

Search for messages

search_all <- imap %>% SELECT("INBOX")
   %>% SEARCH("ALL") %>% execute() 

search_all %>% substr(1, 20)

Fetch messages

header <- imap %>% SELECT("INBOX") %>%
  FETCH(1, sections("header_min")) %>% execute()

header %>% cat()
## To be continued ##

Run tests

devtools::test(reporter = "tap")

crazycapivara/imapr documentation built on May 14, 2019, 11:32 a.m.