Perl基本技三：斯德艾特——File::stat->stat()函数获取文件属性信息

#!usr/bin/perl use strict; use File::stat; my $path; $path = "C:/Users/liuweic/Desktop/df study/s.txt"; # scalar(localtime()) 转化正常时间格式 具体请参考 perldoc -f localtime print scalar(localtime(stat($path)->mtime));

结果：

stat () 返回下列的列表或数组：

#$dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks

其各个含义：

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

在获取时间信息（atime,mtime,ctime）的时候，结合 小招 saclar（localtime（xxx））使用。

PS: 转载请注明出处，作者No. Liu