NAME
BSD::stat - stat() with BSD 4.4 extentions
SYNOPSIS
use BSD::stat;
# just like CORE::stat
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
$atime,$mtime,$ctime,$blksize,$blocks,
$atimensec,$mtimensec,$ctimensec,$flags,$gen)
= stat($filename);
# just like File::stat
$st = stat($file) or die "No $file: $!";
if ( ($st->mode & 0111) && $st->nlink > 1) ) {
print "$file is executable with lotsa links\n";
}
# chflags
chflags(UF_IMMUTABLE, @files)DESCRIPTION
This module's default exports override the core stat() and lstat() functions, replacing them with versions that contains BSD 4.4 extentions such as flags. This module also adds chflags function.
Here are the meaning of the fields:
0 dev device number of filesystem
1 ino inode number
2 mode file mode (type and permissions)
3 nlink number of (hard) links to the file
4 uid numeric user ID of file's owner
5 gid numeric group ID of file's owner
6 rdev the device identifier (special files only)
7 size total size of file, in bytes
8 atime last access time in seconds since the epoch
9 mtime last modify time in seconds since the epoch
10 ctime inode change time (NOT creation time!) in seconds si
11 blksize preferred block size for file system I/O
12 blocks actual number of blocks allocated
13 atimensec; /* nsec of last access */
14 mtimensec; /* nsec of last data modification */
15 ctimensec; /* nsec of last file status change */
16 flags; /* user defined flags for file */
17 gen; /* file generation number */When called with an array context, lstat() and stat() returns an array like CORE::stat. When called with a scalar context, it returns an object whose methods are named as above, just as File::stat.
BSD::stat also adds chflags(). Like CORE::chmod it takes first argument as flags and any following arguments as filenames. for convenience, the followin constants are also set;
UF_SETTABLE 0x0000ffff /* mask of owner changeable flags */
UF_NODUMP 0x00000001 /* do not dump file */
UF_IMMUTABLE 0x00000002 /* file may not be changed */
UF_APPEND 0x00000004 /* writes to file may only append */
UF_OPAQUE 0x00000008 /* directory is opaque wrt. union *
UF_NOUNLINK 0x00000010 /* file may not be removed or renamed */
SF_SETTABLE 0xffff0000 /* mask of superuser changeable flags */
SF_ARCHIVED 0x00010000 /* file is archived */
SF_IMMUTABLE 0x00020000 /* file may not be changed */
SF_APPEND 0x00040000 /* writes to file may only append */
SF_NOUNLINK 0x00100000 /* file may not be removed or renamed */so that you can go like
chflags(SF_ARCHIVED|SF_IMMUTABLE, @files);just like CORE::chmod(), chflags() returns the number of files successfully changed. when an error occurs, it sets !$ so you can check what went wrong when you applied only one file.
EXPORT
stat(), lstat(), chflags() and chflags-related constants are exported
BUGS
unlike CORE::stat, BSD::stat does not accept filehandle as an argument (as yet).
Very BSD specific. It will not work on any other platform.
AUTHOR
Dan Kogai <dankogai@dan.co.jp<gt>
SEE ALSO
COPYRIGHT
Copyright 2001 Dan Kogai <dankogai@dan.co.jp>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.