【发布时间】:2012-10-16 22:00:36
【问题描述】:
使用 OpenSSL 可以解析和转储 ASN.1 DER 文件,输出如下所示:
100:d=5 hl=2 l= 3 prim: OBJECT :organizationalUnitName
105:d=5 hl=2 l= 11 prim: PRINTABLESTRING :Big Number Services
118:d=3 hl=2 l= 20 cons: SET
120:d=4 hl=2 l= 18 cons: SEQUENCE
122:d=5 hl=2 l= 3 prim: OBJECT :commonName
127:d=5 hl=2 l= 11 prim: PRINTABLESTRING :example.com
140:d=2 hl=4 l= 290 cons: SEQUENCE
144:d=3 hl=2 l= 13 cons: SEQUENCE
我想使用 Perl 生成类似的输出。当然,一种方法是从 Perl 中调用 openssl ans1parse,但我正在寻找一种方法,不 依赖于调用外部可执行文件。
我查看了 Perl 模块 Convert::ASN1,但似乎要使用它,您需要我没有的 ASN.1 描述。
【问题讨论】: