Commit 33242d9d authored by Rich Salz's avatar Rich Salz
Browse files

Use scalar, not length; fixes test_evp

parent e195c8a2
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -17,7 +17,7 @@ setup("test_evp");
my @files = ( "evpciph.txt", "evpdigest.txt", "evpencod.txt", "evpkdf.txt",
    "evpmac.txt", "evppbe.txt", "evppkey.txt" );

plan tests => length(@files);
plan tests => scalar(@files);

foreach my $f ( @files ) {
    ok(run(test(["evp_test", srctop_file("test", "$f")])),