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 を使用して同様の出力を生成したいと思います。もちろん、1 つの方法は Perl 内から呼び出すことですが、外部の実行可能ファイルの呼び出しに依存しないopenssl ans1parse
方法を探していました。
Perl モジュールを見ましたConvert::ASN1
が、それを使用するには、私が持っていない ASN.1 記述が必要なようです。