#!/usr/bin/perl
use strict;
use warnings;
use Test::More tests => 4;
use Net::SSLeay;
eval "use Test::Exception;";
SKIP: {
skip 'Neet Test::Exception for the some tests', 3 if $@;
lives_ok( sub { Net::SSLeay::randomize() }, 'randomizing' );
lives_ok( sub { Net::SSLeay::load_error_strings() }, 'loading error strings' );
lives_ok( sub { Net::SSLeay::SSLeay_add_ssl_algorithms() }, 'adding ssl algorithms' );
}
is(Net::SSLeay::hello(), 1, 'hello world');