Home | History | Annotate | Line # | Download | only in recipes
20-test_app.t revision 1.1.1.1.2.2 
      1 #! /usr/bin/env perl
      2 # Copyright 2020-2021 The OpenSSL Project Authors. All Rights Reserved.
      3 #
      4 # Licensed under the Apache License 2.0 (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 use strict;
     10 use warnings;
     11 
     12 use OpenSSL::Test;
     13 
     14 setup("test_app");
     15 
     16 plan tests => 5;
     17 
     18 ok(run(app(["openssl"])),
     19    "Run openssl app with no args");
     20 
     21 ok(run(app(["openssl", "help"])),
     22    "Run openssl app with help");
     23 
     24 ok(!run(app(["openssl", "-wrong"])),
     25    "Run openssl app with incorrect arg");
     26 
     27 ok(run(app(["openssl", "-help"])),
     28    "Run openssl app with -help");
     29 
     30 ok(run(app(["openssl", "--help"])),
     31    "Run openssl app with --help");
     32