WEB技術日記

perlで証明書つきhttps通信

perlで証明書つきhttps通信を行う方法です。
LWPモジュールが必要です。

use LWP::UserAgent;

$ENV{HTTPS_PKCS12_FILE} = ‘証明書ファイル名.p12′;
$ENV{HTTPS_PKCS12_PASSWORD} = ‘証明書パスワード’;

my $ua = new LWP::UserAgent;
my $head = new HTTP::Headers();

my $req = new HTTP::Request(‘POST’, ‘https://アドレス’,$head,”POSTで送る値&で区切り”);
my $res = $ua->request($req);
$sample = $res->content();

 

 

WEB技術日記

 
 
page top