文件操作 - uintn-identity.ph
返回文件管理
返回主菜单
删除本文件
文件: /usr/lib64/perl5/bits/uintn-identity.ph
编辑文件内容
require '_h2ph_pre.ph'; no warnings qw(redefine misc); if(!defined (&_NETINET_IN_H) && !defined (&_ENDIAN_H)) { die("Never use <bits/uintn-identity.h> directly; include <netinet/in.h> or <endian.h> instead."); } unless(defined(&_BITS_UINTN_IDENTITY_H)) { eval 'sub _BITS_UINTN_IDENTITY_H () {1;}' unless defined(&_BITS_UINTN_IDENTITY_H); require 'bits/types.ph'; eval 'sub __uint32_identity { my($__x) = @_; eval q({ $__x; }); }' unless defined(&__uint32_identity); eval 'sub __uint64_identity { my($__x) = @_; eval q({ $__x; }); }' unless defined(&__uint64_identity); } 1;
修改文件时间
将文件时间修改为当前时间的前一年
删除文件