test/recipes/25-test_x509.t

   1 #! /usr/bin/perl
   2
   3 use strict;
   4 use warnings;
   5
   6 use File::Spec;
   7 use Test::More 0.96;
   8 use OpenSSL::Test qw/:DEFAULT top_file/;
   9
  10 setup("test_x509");
  11
  12 plan tests => 4;
  13
  14 require_ok(top_file('test','recipes','tconversion.pl'));
  15
  16 subtest 'x509 -- x.509 v1 certificate' => sub {
  17     tconversion("x509", top_file("test","testx509.pem"));
  18 };
  19 subtest 'x509 -- first x.509 v3 certificate' => sub {
  20     tconversion("x509", top_file("test","v3-cert1.pem"));
  21 };
  22 subtest 'x509 -- second x.509 v3 certificate' => sub {
  23     tconversion("x509", top_file("test","v3-cert2.pem"));
  24 };