文件操作 - Spec.pm
返回文件管理
返回主菜单
删除本文件
文件: /snap/core20/2769/usr/lib/x86_64-linux-gnu/perl-base/File/Spec.pm
编辑文件内容
package File::Spec; use strict; our $VERSION = '3.78'; $VERSION =~ tr/_//d; my %module = ( MSWin32 => 'Win32', os2 => 'OS2', VMS => 'VMS', NetWare => 'Win32', # Yes, File::Spec::Win32 works on NetWare. symbian => 'Win32', # Yes, File::Spec::Win32 works on symbian. dos => 'OS2', # Yes, File::Spec::OS2 works on DJGPP. cygwin => 'Cygwin', amigaos => 'AmigaOS'); my $module = $module{$^O} || 'Unix'; require "File/Spec/$module.pm"; our @ISA = ("File::Spec::$module"); 1; __END__
修改文件时间
将文件时间修改为当前时间的前一年
删除文件