perl笔记
时间：2009-08-25 来源：sinxadmin
1. 取列表的部分值
($a,$b)=(a,b,c,d)[0,3] 则$a=a $b=d
2. $_[0]是@_的一个下标,和标量的$_没有关系.
3. 数组按数值大小排序
@b=sort {$a<=>$b} @a; asc
@b=sort {$b<=>$a} @a; desc
4. glob能象UNIX的ls 命令
@a=glob('/home/*') 或者 @a=</home/*>
这样@a中包含了目录/home下的所有目录和文件.
5. 文件操作
创建删除目录: mkdir rmdir
创建删除文件: open(F,'>/home/test.txt') unlink
读取目录过程:opendir readdir closedir
更改当前目录:chdir
给文件改名: rename
($a,$b)=(a,b,c,d)[0,3] 则$a=a $b=d
2. $_[0]是@_的一个下标,和标量的$_没有关系.
3. 数组按数值大小排序
@b=sort {$a<=>$b} @a; asc
@b=sort {$b<=>$a} @a; desc
4. glob能象UNIX的ls 命令
@a=glob('/home/*') 或者 @a=</home/*>
这样@a中包含了目录/home下的所有目录和文件.
5. 文件操作
创建删除目录: mkdir rmdir
创建删除文件: open(F,'>/home/test.txt') unlink
读取目录过程:opendir readdir closedir
更改当前目录:chdir
给文件改名: rename
相关阅读 更多 +
