- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我整天都在与 IMAP 和 office365 搏斗,但没有成功。
尽管我先建立了 imap 连接,然后使用 $imap->starttls 请求将连接升级到 TLS,但我可以说登录失败了。
我在 Windows 7 64 位上运行 strawberry perl 5.20。
代码:
#!/usr/bin/perl
use strict;
use warnings;
$|=1;
$ENV{'PERL_LWP_SSL_VERIFY_HOSTNAME'} = 0;
use Data::Dumper;
use Mail::IMAPClient;
my $host = 'outlook.office365.com';
my $id = 'XXX';
my $pass = 'XXX';
print "Anon connect to IMAP\n";
my $imap = Mail::IMAPClient->new
(
Server => $host,
# Username => $id,
# Password => $pass,
Debug => 1,
)
|| die "Failed to connect to IMAP server\n";
print "Upgrade connection to TLS\n";
$imap->starttls
(
SSL_verify_mode => 0,
) or die "starttls failed: $@\n";
print "Logging In\n";
$imap->login($id, $pass);
print "Getting Folder\n";
my $folder = $imap->Folder();
print "Folder = $folder\n";
print "Listing Folders\n";
foreach my $f ( grep($imap->selectable($_),$imap->folders ) )
{
print "The $f folder has ",
$imap->unseen_count($f)||0,
" unseen messages.\n";
}
exit;
print "Listing Folders\n";
foreach my $f ($imap->folders)
{
print "The $f folder has ",
$imap->unseen_count($f)||0, " unseen messages.\n";
}
输出:
perl imap.pl
Anon connect to IMAP
Started at Thu Jun 18 20:15:08 2015
Using Mail::IMAPClient version 3.35 on perl 5.020002
Connecting with IO::Socket::INET PeerAddr outlook.office365.com PeerPort 143 Proto tcp Timeout 600 Debug 1
Connected to outlook.office365.com errno(A connect request was made on an already connected socket.)
not using Fast_IO; not available on this platform
Read: * OK The Microsoft Exchange IMAP4 service is ready. [SABLAFgAUABSADAAMgBDAEEAMAAwADUAMQAuAGEAcABjAHAAc
gBkADAAMgAuAHAAcgBvAGQALgBvAHUAdABsAG8AbwBrAC4AYwBvAG0A]
Upgrade connection to TLS
Sending: 1 STARTTLS
Sent 12 bytes
Read: 1 OK Begin TLS negotiation now.
Logging In
Getting Folder
Use of uninitialized value $folder in concatenation (.) or string at imap2.pl line 37.
Folder =
Listing Folders
Sending: 2 LIST "" *
Sent 13 bytes
Read: 2 BAD Command received in Invalid state.
ERROR: 2 BAD Command received in Invalid state. at C:/Strawberry/perl/site/lib/Mail/IMAPClient.pm line 1353.
Mail::IMAPClient::__ANON__("2 BAD Command received in Invalid state.\x{d}\x{a}") called at C:/Strawber
ry/perl/site/lib/Mail/IMAPClient.pm line 1389
Mail::IMAPClient::_get_response(Mail::IMAPClient=HASH(0x87df88), 2, undef) called at C:/Strawberry/per
l/site/lib/Mail/IMAPClient.pm line 1315
Mail::IMAPClient::_imap_command_do(Mail::IMAPClient=HASH(0x87df88), "LIST \"\" *") called at C:/Strawb
erry/perl/site/lib/Mail/IMAPClient.pm line 1214
Mail::IMAPClient::_imap_command(Mail::IMAPClient=HASH(0x87df88), "LIST \"\" *") called at C:/Strawberr
y/perl/site/lib/Mail/IMAPClient.pm line 652
Mail::IMAPClient::_list_or_lsub(Mail::IMAPClient=HASH(0x87df88), "LIST", undef, undef) called at C:/St
rawberry/perl/site/lib/Mail/IMAPClient.pm line 658
Mail::IMAPClient::list(Mail::IMAPClient=HASH(0x87df88), undef, undef) called at C:/Strawberry/perl/sit
e/lib/Mail/IMAPClient.pm line 696
Mail::IMAPClient::_folders_or_subscribed(Mail::IMAPClient=HASH(0x87df88), "list", undef) called at C:/
Strawberry/perl/site/lib/Mail/IMAPClient.pm line 716
Mail::IMAPClient::folders(Mail::IMAPClient=HASH(0x87df88)) called at imap2.pl line 40
ERROR: 2 BAD Command received in Invalid state. at C:/Strawberry/perl/site/lib/Mail/IMAPClient.pm line 1263.
Mail::IMAPClient::_imap_command(Mail::IMAPClient=HASH(0x87df88), "LIST \"\" *") called at C:/Strawberr
y/perl/site/lib/Mail/IMAPClient.pm line 652
Mail::IMAPClient::_list_or_lsub(Mail::IMAPClient=HASH(0x87df88), "LIST", undef, undef) called at C:/St
rawberry/perl/site/lib/Mail/IMAPClient.pm line 658
Mail::IMAPClient::list(Mail::IMAPClient=HASH(0x87df88), undef, undef) called at C:/Strawberry/perl/sit
e/lib/Mail/IMAPClient.pm line 696
Mail::IMAPClient::_folders_or_subscribed(Mail::IMAPClient=HASH(0x87df88), "list", undef) called at C:/
Strawberry/perl/site/lib/Mail/IMAPClient.pm line 716
Mail::IMAPClient::folders(Mail::IMAPClient=HASH(0x87df88)) called at imap2.pl line 40
最佳答案
此代码必须有效:
my $imap = Mail::IMAPClient->new(
Server => $host,
User => $id,
Password => $pass,
Port => 993,
Ssl => 1,
Authmechanism => "PLAIN",
Debug => 1
) or die "Cannot connect through IMAPClient: $@\n";
关于perl office365 imap TLS 访问无法使用 IMAPClient,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/30915634/
我正在使用 IMAPclient 来获取电子邮件的内容,所以我编写了这段代码: messages = server.search(['FROM', user['email']], charset='U
我正在使用 IMAPclient 来获取电子邮件的内容,所以我编写了这段代码: messages = server.search(['FROM', user['email']], charset='U
这就是我使用 Mail::IMAPClient 连接 GMail 的方式 sub connectGMail { my $socket = IO::Socket::SSL->new (
我正在使用 IMAPClient (Python) 从我的电子邮件服务器中检索电子邮件,方法是检查标记有“\Recent”的电子邮件。阅读电子邮件后,电子邮件服务器会自动将电子邮件标志设置为“\See
我需要将所有消息从看不见的移动到垃圾箱(然后从收件箱中删除)。 my $inbox = $imap->select("Inbox"); my @mails = ( $imap->unseen ); f
我正在尝试在我的操作系统上安装 imapclient,但它不起作用。我像这样添加了 perl 存储库: zypper ar -f -n perl http://download.opensu
我需要从电子邮件中获取信件。这些邮件不存在于“收件箱”文件夹中,但存在于“所有邮件”文件夹中。 我使用库“S22.Imap”。此 ImapClient 中的 DefaultMailbox 是“INBO
我正在使用 IdleAsync 来获取有关新电子邮件的通知。 我想在新消息到达时收到通知,然后阅读消息,但是当我尝试阅读消息时,出现异常,提示 ImapClient 处于空闲状态。 我是否需要创建另一
所以我正在编写一个 Python 脚本来从电子邮件中提取文本并关注 these instructions这样做。这是到目前为止的脚本: import imapclient import pprint
我遇到问题的环境:Windows10 上的 Python 2.7.11(已修补到最新)。通过 msi 安装 Python。我检查了设置中的 PATH 设置,它设置为 c:\Python27。 这适用于
我正在尝试查看电子邮件的实际正文。到目前为止,我可以查看主题或任何其他标题,但我找不到一种方法来阅读没有额外内容的正文。 from imapclient import IMAPClient impor
经过数小时的搜索、阅读和寻找答案,我来到这里寻求帮助: 我正在尝试编写一个客户端来使用 Perl 模块阅读我的 Gmail Mail::IMAPClient .到目前为止一切正常,而且效果很好,但是当
我整天都在与 IMAP 和 office365 搏斗,但没有成功。 尽管我先建立了 imap 连接,然后使用 $imap->starttls 请求将连接升级到 TLS,但我可以说登录失败了。 我在 W
我真的开始掌握 IMAPClient 的窍门了。代码:'BODY[HEADER.FIELDS (FROM)]' 返回 From: First Last 我真的希望它返回这样的电子邮件地址: firs
这个问题是由 paul_h 提出的,但我太新了,无法评论(希望)相关信息。我在使用 imapClient 时遇到了同样的问题,而且它显然不是特定于 Python/Windows 版本的。 Paul H
祝大家新年快乐:) 我构建了一个 Web 表单,新员工可以在其中输入数据并将其发送到一个电子邮件地址,在该地址中我收到来自 PHP 的大约 20“组”数据。 Vorname: $firstname
此 Mail::IMAPClient->new() 在 Windows 7 中卡住: sub connectGMail { my $client = Mail::IMAPClient->new
我可以很容易地连接到 IMAP 邮件服务器: use Mail::IMAPClient; use MIME::Base64; use MIME::Parser; my $imap = Mai
我的行家是 commons-net commons-net 3.3 我的代码如下 IMAPClient client = new IMAPClient(); client.
我正在使用外部库 IMAPClient。当登录失败时,我看到这个错误:imaplib.error: [AUTHENTICATIONFAILED] Authentication failed. 当我尝试
我是一名优秀的程序员,十分优秀!