Add ARM files

[dh-make-perl] / dev / arm / libnet-ssleay-perl / libnet-ssleay-perl-1.35 / t / local / 04_basic.t

diff --git a/dev/arm/libnet-ssleay-perl/libnet-ssleay-perl-1.35/t/local/04_basic.t b/dev/arm/libnet-ssleay-perl/libnet-ssleay-perl-1.35/t/local/04_basic.t
new file mode 100644 (file)
index 0000000..70e9d40
--- /dev/null
+++ b/dev/arm/libnet-ssleay-perl/libnet-ssleay-perl-1.35/t/local/04_basic.t
@@ -0,0 +1,17 @@
+#!/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');