1#! /usr/bin/env perl 2# Copyright 2015-2021 The OpenSSL Project Authors. All Rights Reserved. 3# 4# Licensed under the OpenSSL license (the "License"). You may not use 5# this file except in compliance with the License. You can obtain a copy 6# in the file LICENSE in the source distribution or at 7# https://www.openssl.org/source/license.html 8 9 10use OpenSSL::Test qw/:DEFAULT srctop_file/; 11 12setup("test_verify_extra"); 13 14plan tests => 1; 15 16ok(run(test(["verify_extra_test", 17 srctop_file("test", "certs", "roots.pem"), 18 srctop_file("test", "certs", "untrusted.pem"), 19 srctop_file("test", "certs", "bad.pem"), 20 srctop_file("test", "certs", "rootCA.pem")]))); 21