perl中的各种PEM到DER

Max*_*Max 3 perl openssl

我有客户端 - 服务器架构的应用程序.

客户(C程序):

  1. 生成各种DER编码数据
  2. 使用各种PEM头将DER转换为PEM(使用openssl的PEM_write_bio)
  3. 将PEM发送到服务器

服务器(Perl脚本):

  1. 接收PEM数据
  2. 将PEM转换为DER
  3. ....

我的问题是如何在perl中将各种PEM数据转换为DER/BER(二进制数据)?

Sha*_* D. 5

您可以自己剥离PEM标签,并使用内部解码Base64块MIME::Base64.

应该如此简单

$derBlob = decode_base64($base64Blob);
Run Code Online (Sandbox Code Playgroud)