perl的stat函数

发布时间:2019-09-16编辑:脚本学堂
perl stat()函数返回一个数组。

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

例子:获取文件时间
 

复制代码 代码如下:
#!/usr/bin/perl
my @array = stat("mysql.tar.gz");
print "Mtime: $array[9]n";
print "Size: $array[7]n";