Convert::ASN1 is an ASN.1 Encode/Decode library.

SYNOPSYS

use Convert::ASN1;

$asn = Convert::ASN1->new;
$asn->prepare(q<<br />
[APPLICATION 7] SEQUENCE {
int INTEGER,
str OCTET STRING
}

>);

$pdu = $asn->encode( int => 7, str => "string");

$out = $asn->decode($pdu);
print $out->{int}," ",$out->{str},"n";

use Convert::ASN1 qw(:io);

$peer = asn_recv($sock,$buffer,0);
$nbytes = asn_read($fh, $buffer);
$nbytes = asn_send($sock, $buffer, $peer);
$nbytes = asn_send($sock, $buffer);
$nbytes = asn_write($fh, $buffer);
$buffer = asn_get($fh);
$yes = asn_ready($fh)

Convert::ASN1 encodes and decodes ASN.1 data structures using BER/DER rules.