#! /usr/bin/perl use OpenSSL::Test::Simple; simple_test("test_md4", "md4test", "md4");