Fonction Perl stat
La description
Cette fonction renvoie un tableau de 13 éléments donnant les informations d'état d'un fichier, spécifiées par FILEHANDLE, EXPR ou $ _. La liste des valeurs renvoyées est indiquée ci-dessous dans le tableau. S'il est utilisé dans un contexte scalaire, renvoie 0 en cas d'échec, 1 en cas de succès.
Notez que la prise en charge de certains de ces éléments dépend du système. Consultez la documentation pour une liste complète.
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
Syntaxe
Voici la syntaxe simple de cette fonction -
stat FILEHANDLE
stat EXPR
stat
Valeur de retour
Cette fonction renvoie ARRAY, ($ device, $ inode, $ mode, $ nlink, $ uid, $ gid, $ rdev, $ size, $ atime, $ mtime, $ ctime, $ blksize, $ blocks)
Exemple
Voici l'exemple de code montrant son utilisation de base -
#!/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");
Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -
stat() 2065, 5374250, 1508051555