Пытаюсь распарсить asn1 строку (rsa public key)

use Crypt::PK::RSA;
use Convert::ASN1;

my $pk = Crypt::PK::RSA->new();
my $ex = 65537;
my $ex_str = "65537";
$pk->generate_key(128, $ex);


my $private = $pk->export_key_der('private');
my $public = $pk->export_key_der('public');

my $asn_key = Convert::ASN1->new();
print $public."\n";
#$asn_key->prepare_file('1.asn');
$asn_key->prepare(q(SEQUENCE {
    modulus           INTEGER,
    publicExponent    INTEGER 
}));
$out = $asn_key->decode($public);
print $out->{modulus}."    ddddddddd".$out->{publicExponent}."\n";