[thirdparty/openssl.git] / test / recipes / 25-test_sid.t

#! /usr/bin/perl

use strict;
use warnings;

use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;

setup("test_sid");

plan tests => 2;

require_ok(top_file('test','recipes','tconversion.pl'));

subtest 'sid conversions' => sub {
    tconversion("sid", top_file("test","testsid.pem"), "sess_id");
};
Commit	Line	Data
4650de3e RL	1	#! /usr/bin/perl
	2
	3	use strict;
	4	use warnings;
	5
	6	use File::Spec;
fb921436	7	use Test::More 0.96;
4650de3e RL	8	use OpenSSL::Test qw/:DEFAULT top_file/;
	9
	10	setup("test_sid");
	11
	12	plan tests => 2;
	13
	14	require_ok(top_file('test','recipes','tconversion.pl'));
	15
	16	subtest 'sid conversions' => sub {
	17	tconversion("sid", top_file("test","testsid.pem"), "sess_id");
	18	};