diff options
| author | Brendan O'Dea <bod@debian.org> | 2002-09-24 08:45:40 +1000 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-09-26 07:51:10 +0000 |
| commit | 3155e0b0b510ed7522ef21f1acd786768d4fede8 (patch) | |
| tree | 4f5747ae84ed4a7b3a8ad4a8a6bdd1515470aba3 | |
| parent | 718842b0e14b2d067314bf35e22eac61894424e9 (diff) | |
| download | perl-3155e0b0b510ed7522ef21f1acd786768d4fede8.tar.gz | |
perldoc -f stat (perlfunc.pod)
From: "Brendan O'Dea" <bod@debian.org>
Message-ID: <20020923124540.GB28031@londo.odea.dropbear.id.au>
p4raw-id: //depot/perl@17918
| -rw-r--r-- | pod/perlfunc.pod | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod index 53ac84e693..9305f21bfd 100644 --- a/pod/perlfunc.pod +++ b/pod/perlfunc.pod @@ -5257,7 +5257,7 @@ You can import symbolic mode constants (C<S_IF*>) and functions $group_read = ($mode & S_IRGRP) >> 3; $other_execute = $mode & S_IXOTH; - printf "Permissions are %04o\n", S_ISMODE($mode), "\n"; + printf "Permissions are %04o\n", S_IMODE($mode), "\n"; $is_setuid = $mode & S_ISUID; $is_setgid = S_ISDIR($mode); @@ -5285,7 +5285,7 @@ The commonly available S_IF* constants are and the S_IF* functions are - S_IFMODE($mode) the part of $mode containing the permission bits + S_IMODE($mode) the part of $mode containing the permission bits and the setuid/setgid/sticky bits S_IFMT($mode) the part of $mode containing the file type |