App-wsgetmail
view release on metacpan or search on metacpan
"totalItemCount":2,
"parentFolderId":"AABBBBBAAAAA=",
"childFolderCount":0,
"unreadItemCount":2,
"id":"AAAABBBBCCCCCDDDDDXXXXX="
} ]}');
}
sub get_mocked_token_response {
return HTTP::Response->new('200', 'OK', ['Content-Type' => 'application/json'],
'{"token_type":"Bearer","scope":"email Mail.Read Mail.Read.Shared Mail.ReadWrite Mail.ReadWrite.Shared openid User.Read","expires_in":"3599","ext_expires_in":"3599","expires_on":"1591286563","not_before":"1591282663","r...
);
}
sub get_mocked_messages_response {
my $json = read_file('t/mock_responses/messages.json');
return HTTP::Response->new('200', 'OK', ['Content-Type' => 'application/json'], $json);
}
sub get_test_config {
( run in 0.220 second using v1.01-cache-2.11-cpan-4d4bc49f3ae )