Perl 学习笔记-文件测试

1.文件测试操作符

   针对文件和目录的测试操作符:

    -r/-w/-x/-o: 文件或目录, 对有效的(负责运行这个程序的)用户或组来说是可读/写/执行/拥有 的; 这些测试位会查看文件的权限位, 以此判断哪些操作是允许的, 如果系统使用访问控制列表(ACL), 那么测试就按列表进行判断, 但是只是测试结果只是操作系统的看法, 但是受实际情况限制, 运行的事未必可行, 如空文件运行运行, 但是并没有什么意义.

    -R/-W/-X/-O: 文件或目录, 对实际的用户或组来说是可读/写/执行/拥有 的; 使用的是实际用户或组的ID, 这在程序以set-ID方式运行时相当重要.

    -e: 文件或目录, 是存在的

    -z: 文件存在但无内容(对目录来说永远为假)

    -s: 文件或目录存在且有内容, 返回以字节为单位的文件大小

    -f: 是普通文件

    -d: 是目录

    -l: 是符号链接

    -S: 是socket类型的文件

    -p: 是命名管道, 也就是FIFO队列

    -b: 是块设备文件 (如某个可挂载的磁盘)

    -c: 是字符设备文件 (如某个I/O设备)

    -u/-g/-k: 文件或目录设置了setuid/setgit/sticky位

    -t: 文件句柄是TTY设备(类似系统函数isatty()的测试, 不能对文件名进行此测试);  如果文件可以交互就会判断为TTY设备,  所以普通文件或管道都可以排除在外, 当  -t STDIN 返回真的时候, 通常意味着可以用交互的方式向用户提出一些问题, 若为假, 则表示输入来源是个普通文件或管道, 而不是键盘.

    -T/-B: 看起来像是文本文件/二进制文件(因为判断并不是很准确)

    -M/-A/-C: 最后一次  修改后/访问后/文件节点编号变更后  至今的天数

2.同一个文件的多项属性测试

   if(-r $filename and -w $filename){} 操作会2次获取同一个文件的属性, 比较浪费.  可以使用虚拟文件句柄  _ 来告诉Perl用上次查询过的文件信息来做当前的测试.  if(-r $filename and -w _){} , 只要是查询上一次获取到的同一个文件的属性信息, 那么在其他地方也可以使用这个虚拟文件句柄. 

3.栈式文件测试操作.

   可以一次测试多个文件的属性,靠近文件名的测试会先执行,次序为从右往左,不过通常来说测试次序不是很重要。 if(-r -w -x -o -d $filename){} 

  对于返回真假值以外的测试来说,栈式写法并不出色。例如,想要确认某个小于512字节的目录:  if(-s -d $filename < 512){} 这样写就不对, 等同于 if((-d $filename and -s _)<512){}。因为文件测试返回布尔值和512比较的。

4. statlast  函数

   通过文件测试操作符可以获取某个文件或文件句柄的常用属性, 但是并不能获取文件链接数和拥有者ID等等, 可以使用stat函数, 如果执行失败(通常是无效文件名或不存在) 返回空列表, 成功返回13个数字元素的列表.

my($dev,$ino,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime, $blksize,$blocks) = stat($filename);

  $dev 和 $ino: 文件所在设备的编号和与文件的inode编号, 这两个编号决定文件的唯一性. 即使它具有不同的文件名(使用硬链接创建), 这个组合依然是唯一的.

  $mode : 文件的权限位集合, 八进制

  $nlink: 文件或目录的硬链接数, 也就是这个条目有多少个真实的名称. 

  $uid 和 $gid : 文件拥有者的用户编号以及组ID.

  $size: 以字节为单位的文件大小.

  $atime, $mtime, $ctime: 3种时间戳

5. localtime() 

  使用 stat 等函数获得的时间戳值可以用 localtime 函数转换为容易让人阅读的形式.

my($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst)=localtime($timestamp);

  返回值: $mon 是从0 开始计数的, 所以正确的值应该+1;  年份是从1900年至今的年份, 所以正确值应该+1900;  $yday 指目前是今年的第几天,范围从(0-365),从1月1日计算到12月31日.

  类似函数: 

     gmtime()和localtime()  返回世界标准时间(格林威治时间)

     time() 获取当前时间戳

6.按位运算操作符.

  按位与或非左移右移异或, 完全和C相同.

  使用位字符串: 按位操作符可以操作整数(至少32位)和 位字符串 ,  如果按位运算的任意一个操作数是字符串, 则Perl会当成位字符串处理, 如:  "\xAA" | "\x55";  结果是:  "\xFF" ; 这是在Perl中少数区分字符串和整数的地方. 

    

posted @ 2015-05-31 23:23  roger9567  阅读(271)  评论(0编辑  收藏  举报