sub OpenCA::OpenSSL::CRL::new {
   my $blah = OpenCA::OpenSSL::CRL::_new_from_der(@_);
   bless $blah, 'OpenCA::OpenSSL::CRL';
}
sub OpenCA::OpenSSL::CRL::DESTROY {
   OpenCA::OpenSSL::CRL::X509_CRL_free(@_);
}