perl檔案測試

perl中檔案測試的操作符及意義

測試檔案的許可權：

-r 檔案或者目錄對目前（有效）使用者是可讀的

-w 檔案或者目錄對目前（有效）使用者是可寫的

-x  檔案或者目錄對目前（有效）使用者是可執行檔

-o   檔案或者目錄有對目前（有效）使用者擁有

-R 檔案或者目錄，對實際的使用者或組來說是可讀的

-W 檔案或者目錄，對實際的使用者或者組來說是可寫的

-X 檔案或者目錄，對實際的使用者或者組來說是可執行檔

-O 檔案或者目錄，有實際的使用者擁有

測試檔案的存在：

-e  檔案或者目錄是存在的

-z  檔案存在但沒有內容

-s  檔案或者目錄存在

測試檔案的類型：

-f  是普通檔案

-d  是目錄

-l  是符號連結

-S 是socket類型檔案

-p 是具名管道

-b  是塊裝置檔案

-c  是字元裝置檔案

-u  檔案或目錄設定了setuid位

-g  檔案或目錄設定了setguid位

-k  檔案或者目錄設定了sticky位

-t  檔案控制代碼是TTY裝置

-T  文字檔

-B 二進位檔案

測試檔案的時間：

-M  最後一次被修改至今的天數

-A 最後一次被訪問至今的天數

-C  最後一次檔案節點編號被變更後至今的天數

下面的perl程式可以查看一個目錄下的檔案是否是可讀可寫可執行檔，目錄名由命令列傳入。

#!/usr/bin/perl -wopendir(FH,"@ARGV[0]");my @list=readdir FH;closedir(FH)foreach my $file (@list){if (-r -w -x $file){print "$file is readable,writeable and excuteable\n"}}