文件操作 - SmallTest.pm
返回文件管理
返回主菜单
删除本文件
文件: /usr/share/doc/perl-Test-Simple/t/lib/SmallTest.pm
编辑文件内容
use strict; use warnings; package SmallTest; require Exporter; use vars qw( @ISA @EXPORT ); @ISA = qw( Exporter ); @EXPORT = qw( ok is_eq is_num ); use Test::Builder; my $Test = Test::Builder->new; sub ok { $Test->ok(@_); } sub is_eq { $Test->is_eq(@_); } sub is_num { $Test->is_num(@_); } sub getTest { return $Test; } 1;
修改文件时间
将文件时间修改为当前时间的前一年
删除文件