文件操作 - openssl_utils.com.in
返回文件管理
返回主菜单
删除本文件
文件: /usr/local/src/openssl-1.1.1w/VMS/openssl_utils.com.in
编辑文件内容
$ ! OpenSSL utilities $ ! $ $ v := {- sprintf "%02d%02d", split(/\./, $config{version}) -} $ $ OPENSSL'v' :== $OSSL$EXE:OPENSSL'v' $ OPENSSL :== $OSSL$EXE:OPENSSL'v' $ $ IF F$TYPE(PERL) .EQS. "STRING" $ THEN $ C_REHASH :== 'PERL' OSSL$EXE:c_rehash.pl $ ELSE $ WRITE SYS$ERROR "NOTE: no perl => no C_REHASH" $ ENDIF
修改文件时间
将文件时间修改为当前时间的前一年
删除文件