文件操作 - 80-test_ciphername.t
返回文件管理
返回主菜单
删除本文件
文件: /usr/local/src/openssl-1.1.1w/test/recipes/80-test_ciphername.t
编辑文件内容
#! /usr/bin/perl # # Copyright 2017 The OpenSSL Project Authors. All Rights Reserved. # Copyright 2017 BaishanCloud. All rights reserved. # # Licensed under the OpenSSL license (the "License"). You may not use # this file except in compliance with the License. You can obtain a copy # in the file LICENSE in the source distribution or at # https://www.openssl.org/source/license.html use strict; use warnings; use OpenSSL::Test::Simple; use OpenSSL::Test; use OpenSSL::Test::Utils qw(alldisabled available_protocols); setup("test_ciphername"); my $no_anytls = alldisabled(available_protocols("tls")); # If we have no protocols, then we also have no supported ciphers. plan skip_all => "No SSL/TLS protocol is supported by this OpenSSL build." if $no_anytls; simple_test("test_ciphername", "ciphername_test");
修改文件时间
将文件时间修改为当前时间的前一年
删除文件