perl 文件[四]

来源:互联网 发布:docker nginx 配置 编辑:程序博客网 时间:2024/06/14 04:53
-e 文件是否存在-s 是否为空文件操作glob  @a=glob("*.txt") 返回与模式匹配的所有文件目录。如果赋值给简单变量则一次只返回一个文件.参数可以是文件名或目录只能接受有限的文件数,报文件太多错误。用shell来执行的,因为用shell用来解释执行,故运行速度慢。另一种形式是@a=<*.txt>,是古老的用法,推荐用glob? 匹配单个字符* 任何数目的字符[ab]ab 中的任一个{a,b.....}匹配a或b,a,b可以不是单字符,如{txt,doc}truncate(file,length):将文件的长度减少到length字节.如果文件长度已经小于length,则不做任何事。其中filename可以为文件名,也可以为文件变量。rename(old,new)成功=1 可以从一个目录移动到另一个目录。不检查new是否存在,可能破坏文件#!/usr/bin/perlrmdir(aa) || die $!;[oracle@jhoa 13]$ perl a1.pl Directory not empty at a1.pl line 2.rmdir :用于删除空目录

0 0