文件操作 - TimeSource.pm
返回文件管理
返回主菜单
删除本文件
文件: /var/lib/pcp/pmdas/activemq/TimeSource.pm
编辑文件内容
# # Copyright (c) 2015 Aconex # # This program is free software; you can redistribute it and/or modify it # under the terms of the GNU General Public License as published by the # Free Software Foundation; either version 2 of the License, or (at your # option) any later version. # # This program is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY # or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License # for more details. # use strict; package PCP::TimeSource; use Time::HiRes; qw(time); sub new { my $class = shift; my $self = {}; bless $self, $class; return $self; } sub get_time { my $self = @_; return time(); } 1;
修改文件时间
将文件时间修改为当前时间的前一年
删除文件