#!/usr/bin/perl # use Convert::ASN1; use Crypt::X509::CRL; use Data::Dumper; $crl = "./ent.crl"; $decoded = Crypt::X509::CRL->new( crl => $crl ); if ( $decoded->error ) { warn "Error on parsing Certificate Revocation List: ", $decoded->error; } print Dumper ($decoded);