文件操作 - 01_arch.t
返回文件管理
返回主菜单
删除本文件
文件: /usr/share/doc/perl-common-sense/t/01_arch.t
编辑文件内容
BEGIN { $| = 1; print "1..1\n" } use common::sense; if ($common::sense::VERSION < 3.7) { print STDERR <<EOF; *** *** WARNING *** *** old version of common::sense still installed, *** your perl library is corrupted. *** *** please manually uninstall older common::sense versions *** or use "make install UNINST=1" to remove them. *** EOF } print "ok 1\n";
修改文件时间
将文件时间修改为当前时间的前一年
删除文件