summaryrefslogtreecommitdiffstats
path: root/perl/g.pl
diff options
context:
space:
mode:
Diffstat (limited to 'perl/g.pl')
-rw-r--r--perl/g.pl18
1 files changed, 0 insertions, 18 deletions
diff --git a/perl/g.pl b/perl/g.pl
deleted file mode 100644
index 80b1a422f8..0000000000
--- a/perl/g.pl
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/usr/local/bin/perl
-use ExtUtils::testlib;
-use SSLeay;
-
-$num=SSLeay::BN::new();
-$shift=SSLeay::BN::new();
-
-print "0\n";
-$num=SSLeay::BN::hex2bn("1234329378209857309429670349760347603497603496398");
-print "1\n";
-$s=SSLeay::BN::hex2bn("59");
-print "a\n";
-$r=$num->lshift(59);
-print "b";
-
-print $num->bn2hex."\n";
-print $s->bn2hex."\n";
-print $r->bn2hex."\n";