|
第12章:目录操作
12.1 在目录树上移动
chdir
12.2 Globbing
Shell将每个命令行中的任何的文件名模式转换成他所匹配的文件名。这被称为globbing。
Perl使用glob操作即完成相同功能。
例如:
my @all_files = glob “*.exe”; # 当前目录下的所有exe文件
12.3 globbing 的替换语法
12.3.1 同glob
尖括号(<>)中间放入星号(*)
例如:
my @all_files = <*>;
12.3.2 加入斜线
例如:
my @files = <FRED/*>
12.4 目录句柄
opendir:打开目录
readdir:读入当前目录
closedir:关闭目录
12.5 递归的目录列表
使用库:File::Find
12.6 删除文件
unlike
例如:
Unlike “*.out” # 删除当前目录下所有的out文件
相当于shell中的rm命令。
12.7 重命名文件
rename
例如:
Rename “old.out”, “new.out”;
类似shell中的mv命令。
12.8 连接和文件
link:硬连接(hard links)
等同于shell中的ln命令。
syslink:符号连接(也叫软连接(soft link))
在windows系统相当于“快捷方式”
readlink:找出符号连接指向的地方
u ls –ail
u ls –i
u ls -l
“.”:当前目录
“..”:父目录
12.9 创建和删除目录
mkdir:创建目录
rmdir:删除目录
12.10 修改权限
chomd
同shell中的chmod命令。
12.11 改变所有者
chown
同shell中的chown命令。
12.12 改变时间戳
utime
例如:
my $now = time;
my $ago = $now -24 * 60 * 60; # 一天的秒数
utime($now, $ago, glob(“*”)); # 设成当前访问的,一天之前修改的
|
|
|