文件操作 - register.pm
返回文件管理
返回主菜单
删除本文件
文件: /snap/core20/2769/usr/lib/x86_64-linux-gnu/perl-base/warnings/register.pm
编辑文件内容
package warnings::register; our $VERSION = '1.04'; require warnings; # left here as cruft in case other users were using this undocumented routine # -- rjbs, 2010-09-08 sub mkMask { my ($bit) = @_; my $mask = ""; vec($mask, $bit, 1) = 1; return $mask; } sub import { shift; my @categories = @_; my $package = (caller(0))[0]; warnings::register_categories($package); warnings::register_categories($package . "::$_") for @categories; } 1; __END__
修改文件时间
将文件时间修改为当前时间的前一年
删除文件