Perl取檔案大小以及檔案測試引數

2021-08-18 15:15:55 字數 1433 閱讀 4852

perl取檔案大小

my @args = stat ($filename);

my $size = $args[7];

stat()函式返回乙個陣列。下面是陣列各元素的含義。

0 dev 裝置號 驅動器號(c:通常是2,d:通常是3,等等)

1 ino 索引節號 總是0

2 mode 檔案的方式 無

3 nlink 鏈結號 通常為0;windows nt;檔案系統允許鏈結

4 uid 檔案所有者的使用者id(uid)總是0 

5 gid 檔案所有者的組id(gid)總是0

6 rdev 特殊檔案資訊 驅動器號(重複)

7 size 檔案大小(以位元組計)檔案大小(以位元組計)

8 atime 上次訪問的時間 上次訪問的時間

9 mtime 上次修改的時間 上次修改的時間

10 ctime inode修改時間 檔案的建立時間

11 blksz 磁碟塊的大小 總是0

12 blocks 檔案中的塊的數量 總是0

例:獲取檔案時間

my @array = stat("mysql.tar.gz");

print "$array[9]/n";

$size=(stat)[7]

$size=(stat filename)[7]

perl中的檔案測試引數

-r 檔案或是目錄對該(有效)使用者或組可讀

-w 檔案或是目錄對該(有效)使用者或組可寫

-x 檔案或是目錄對該(有效)使用者或組可

-o 檔案或是目錄被該(有效)使用者所有

-r 檔案或目錄對該實際使用者或組可讀

-w 檔案或目錄對該實際使用者或組可寫

-x 檔案或目錄對該實際使用者或組可執行

-o 檔案或目錄被該實際使用者所有

-e 檔案或目錄存在

-z 檔案存在,大小為零,判斷檔案是否大小為零(對目錄總為假)

-s 檔案存在,大小非零(即,檔案大小,單位為位元組)

-f 條目是個普通檔案

-d 條目是個普通目錄

-l 條目是個符號連線

-s 條目是個套接字

-p 條目是個命名管道(乙個fifo)

-b 條目是個特殊(block-special)檔案(如乙個可裝載磁碟)

-c 條目是個字元特殊(character-special)檔案(如乙個i/o裝置)

-u 檔案或目錄是setuid

-g 檔案或目錄是setgid

-k 檔案或目錄的粘著位(sticky bit)被設定

-t 檔案控制代碼是個tty(可由isatty()系統函式返回;檔名不能由本測試來測試)

-t 檔案像是個「文字」檔案

-b 檔案像是個「二進位制」檔案

-m 更改年齡(單位:天)

-a 訪問年齡(單位:天)

-c inode更改年齡(單位:天)

ios 取本地檔案大小,檔案相關屬性

要做乙個本地檔案管理的小功能,獲取應用沙盒目錄及檔案列表的方法都比較常見,但是想獲取指定檔案大小時,網上卻很少提及,看了半天原始碼,才找到地方,在這裡share一下 nsfilemanager fm nsfilemanager defaultmanager 取檔案大小 nserror error n...

測試文字檔案大小

1 源 說明 測試文字名稱為example.txt const char filename example.txt long m,n ifstream file filename,ios in ios binary m file.tellg file.seekg 0,ios end n file.t...

檔案大小換算

1千吉位元組 tb,terabyte 1024吉位元組 2的40次方位元組 1tb 1024gb 1吉位元組 gb,gigabyte 1024兆位元組 2的30次方位元組 1gb 1024mb 1兆位元組 mb,megabyte 1024千位元組 2的20次方位元組 1mb 1024kb 1千位元組...