Perl stat 函数
描述
此函数返回一个 13 元素数组,给出文件的状态信息,由 FILEHANDLE、EXPR 或 $_ 指定。 返回的值列表如下表所示。 如果在标量上下文中使用,则在失败时返回 0,在成功时返回 1。
请注意,对其中一些元素的支持取决于系统。 查看文档以获取完整列表。
Element Description 0 Device number of file system 1 Inode number 2 File mode (type and permissions) 3 Number of (hard) links to the file 4 Numeric user ID of file.s owner 5 Numeric group ID of file.s owner 6 The device identifier (special files only) 7 File size, in bytes 8 Last access time since the epoch 9 Last modify time since the epoch 10 Inode change time (not creation time!) since the epoch 11 Preferred block size for file system I/O 12 Actual number of blocks allocated
语法
以下是此函数的简单语法 −
stat FILEHANDLE stat EXPR stat
返回值
这个函数返回数组,($device, $inode, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks)
示例
以下是显示其基本用法的示例代码 −
#!/usr/bin/perl -w ($device, $inode, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks) = stat("/etc/passwd"); print("stat() $device, $inode, $ctime\n");
执行上述代码时,会产生以下结果 −
stat() 2065, 5374250, 1508051555