Question

以下是该场景：我需要连接到网站以检索以XML格式化的电子实验室结果。为了连接，我需要使用数字证书。

我已经能够在Perl中获得这个版本。它看起来像这样：

#!/usr/bin/env perl

use strict;
use WWW::Mechanize;
$|++;

my $username = 'xxx';
my $password = 'yyy';

$ENV{HTTPS_PKCS12_FILE}     = 'CERTFILE.pfx';
$ENV{HTTPS_PKCS12_PASSWORD} = 'PathCert';

my $mech = WWW::Mechanize->new();
$mech->agent_alias('Windows IE 6');

$mech->get("https://www.example.org/xyz/,DanaInfo=999.33.1.10+");
$mech->get("https://www.example.org/xyz/isapi_pathnet.dll?Page=Login&Mode=Silent&UserID=xxx&Password=yyy,DanaInfo=999.33.1.10");
$mech->get("https://www.example.org/xyz/isapi_pathnet.dll?Page=HL7&Query=NewRequests,DanaInfo=999.33.1.10");

print $mech->content();

现在，当我从我的工作站运行它时，这是有效的。但是：

如果我使用perl2exe编译它，它就不起作用。
如果我尝试用pp编译它（例如“pp -r sslclient.pl”），我得到的全部是“500 SSL协商失败：”
如果我将整个目录复制到另一台计算机，该脚本只会挂在第一个$ mech-＆gt; get（）语句中。
我真正想要的是在Python中找到与此类似的东西（我的应用程序的其余部分是Python），但到目前为止还没有运气。

所以，这里有很多问题。有人有什么想法吗？

Answer 1

我不知道您的perl问题是怎么回事。但是，可以找到Python的机械化here。

使用PFX证书连接到HTTP站点

1 个答案: