Perl语言学习笔记 13 目标操作

1、改变目录

chdir "/etc" or die "can't chdir to '/etc'!\n";

省略参数会回到用户主目录，与cd效果一样；

2、文件名通配

my @all_files = glob "*"; #不包括以点号开头的文件

my @pm_files = glob "*.pm";

一次匹配多种模式，用空格隔开：my @files = ".* *"; #可以匹配所有的文件，包括以点号开头

3、文件名通配另一种语法

my @files = <*>; ##等效于：my @files = glob "*";

支持变量内插：my $dir="/etc"; my @dir_files=<$dir/* $dir/.*>;