summaryrefslogtreecommitdiff
path: root/cpan/Digest-SHA/t/sha384.t
diff options
context:
space:
mode:
Diffstat (limited to 'cpan/Digest-SHA/t/sha384.t')
-rw-r--r--cpan/Digest-SHA/t/sha384.t14
1 files changed, 3 insertions, 11 deletions
diff --git a/cpan/Digest-SHA/t/sha384.t b/cpan/Digest-SHA/t/sha384.t
index 9d026ae1ff..16fefcf07c 100644
--- a/cpan/Digest-SHA/t/sha384.t
+++ b/cpan/Digest-SHA/t/sha384.t
@@ -1,13 +1,3 @@
-use strict;
-
-my $MODULE;
-
-BEGIN {
- $MODULE = (-d "src") ? "Digest::SHA" : "Digest::SHA::PurePerl";
- eval "require $MODULE" || die $@;
- $MODULE->import(qw(sha384_hex));
-}
-
BEGIN {
if ($ENV{PERL_CORE}) {
chdir 't' if -d 't';
@@ -15,8 +5,10 @@ BEGIN {
}
}
+use strict;
+use Digest::SHA qw(sha384_hex);
+
my @vecs = map { eval } <DATA>;
-$#vecs -= 2 if $MODULE eq "Digest::SHA::PurePerl";
my $numtests = scalar(@vecs) / 2;
print "1..$numtests\n";