POSIX::2008 - Perl interface to POSIX.1-2008
use Fcntl; use POSIX::2008 qw(openat pwrite); sysopen my $dh, '/tmp', O_RDONLY|O_DIRECTORY|O_NOFOLLOW or die 'Dafuq?'; my $fh = openat($dh, 'foobar', O_RDWR|O_CREAT); pwrite($fh, 'fuckyounsa', 50);
POSIX::2008 contains many of the interfaces specified by POSIX.1-2008 that the core POSIX module withholds, implements in Perl or fucked up.
This module is provided "as is" unless someone volunteers to maintain it.
Since version 0.05, all I/O functions that take numeric file descriptors also accept Perl file or directory handles. openat() even returns a handle if you passed it one.
openat()
For system calls that return -1 on failure and 0 on success the return value is mapped to undef on failure and "0 but true" on success. This is the majority of system calls.
For system calls where 0 is a valid return value it is left unchanged. These are read(), write(), pread(), pwrite(). openat() gets a special treatment in this module, see its description below.
read()
write()
pread()
pwrite()
n = a64l(s);
abort();
ui = abs(i);
y = acos(x);
y = acosh(x);
remaining_sec = alarm(sec);
y = asin(x);
y = asinh(x);
z = atan2(y, x);
y = atan(x);
y = atanh(x);
f = atof(s);
i = atoi(s);
l = atol(s);
s = basename(path);
r = cabs(re, im);
(re, im) = cacos(re, im);
(re, im) = cacosh(re, im);
phi = carg(re, im);
(re, im) = casinh(re, im);
(re, im) = catan(re, im);
(re, im) = catanh(re, im);
ret = catclose(catd);
s = catgets(catd, set_id, msg_id, dflt_string);
catd = catopen(name, oflag);
y = cbrt(x);
(re, im) = ccos(re, im);
(re, im) = ccosh(re, im);
y = ceil(x);
(re, im) = cexp(re, im);
ret = chdir(path);
ret = chmod(path, mode);
ret = chown(path, uid, gid);
im = cimag(re, im);
clock_id = clock_getcpuclockid(pid);
pid defaults to $$. Returns undef on error.
(sec, nsec) = clock_getres(clock_id);
clock_id defaults to CLOCK_REALTIME. Returns empty list on error.
(sec, nsec) = clock_gettime(clock_id);
(rem_sec, rem_nsec) = clock_nanosleep(clock_id, flags, sec, nsec);
In scalar context returns the remaining seconds as a floating point number.
ret = clock_settime(clock_id, sec, nsec);
(re, im) = clog(re, im);
s = confstr(name);
name is one of the _CS_ integer constants.
(re, im) = conj(re, im);
xs = copysign(x, y);
y = cos(x);
y = cosh(x);
(re, im) = cpow(re_x, im_x, re_y, im_y);
(re, im) = cproj(re, im);
re = creal(re, im);
(re, im) = csin(re, im);
(re, im) = csinh(re, im);
(re, im) = csqrt(re, im);
(re, im) = ctan(re, im);
(re, im) = ctanh(re, im);
name = dirname(path);
(quot, rem) = div(numer, denom);
dlclose(dlhandle);
dlerror();
dlhandle = dlopen(file, mode);
addr = dlsym(dlhandle, name);
r = drand48();
endutxent();
(r, X0, X1, X2) = erand48(X0, X1, X2);
y = erf(x);
y = erfc(x);
y = exp2(x);
y = expm1(x);
ret = faccessat(dirfd, path, amode, flags=0);
flags is the bitwise OR of zero or more of AT_EACCESS, AT_SYMLINK_NOFOLLOW.
ret = fchdir(dirfd);
ret = fchmod(fd, mode);
ret = fchmodat(dirfd, path, mode, flags=0);
flags can be 0 or AT_SYMLINK_NOFOLLOW.
ret = fchown(fd, uid, gid);
ret = fchownat(dirfd, path, uid, gid, flags=0);
ret = fdatasync(fd);
ret = fdopen(fd, mode)
Returns a file handle associated with the file descriptor fd. mode is one of the values "r", "w", "a" with an optional "+" and/or "b".
"r"
"w"
"a"
"+"
"b"
It's similar to IO::Handle::new_from_fd() but it really calls fdopen(3), expects letter mode strings (e.g. "r", not "<") and fails if the mode is not compatible with the flags of fd (none of which new_from_fd() does).
IO::Handle::new_from_fd()
fdopen(3)
"<"
new_from_fd()
Returns undef on failure.
ret = fdopendir(fd)
Returns a directory handle associated with the file descriptor fd. Usage example:
my $dh = do { sysopen my $fh, '/tmp', O_RDONLY|O_DIRECTORY|O_NOFOLLOW; fdopendir($fh); # or fdopendir(fileno $fh) but the former also works # with handles from opendir() for which fileno does # not work before Perl 5.22 }; my @files = readdir $dh; # this would fail with $fh from sysopen
d = fdim(double x, double y);
round = fegetround();
ret = fesetround(round);
pos = ffs(i);
y = floor(x);
r = fma(x, y, z);
m = fmax(x, y);
m = fmin(x, y);
m = fmod(x, y);
ret = fnmatch(pattern, string, flags);
Returns 0 if string matches pattern, FNM_NOMATCH if there is no match, undef if there is an error.
flags is the bitwise OR of zero or more of FNM_NOESCAPE, FNM_PATHNAME, FNM_PERIOD, FNM_FILE_NAME, FNM_LEADING_DIR, FNM_CASEFOLD.
fpclassify(x);
Returns one of FP_NAN, FP_INFINITE, FP_ZERO, FP_SUBNORMAL, FP_NORMAL.
(dev, ino, mode, nlink, uid, gid, rdev, size, atim_sec, mtim_sec, ctim_sec, blksize, blocks, atim_nsec, mtim_nsec, ctim_nsec) = fstatat(dirfd, path, flags = 0);
flags is the bitwise OR of zero or more of AT_SYMLINK_NOFOLLOW, AT_NO_AUTOMOUNT.
ret = fsync(fd);
ret = ftruncate(fd, length);
ret = futimens(fd, atime_sec, atime_nsec, mtime_sec, mtime_nsec);
atime_sec and mtime_sec default to 0, atime_nsec and mtime_nsec default to UTIME_NOW.
(sec, min, hour, mday, mon, year, wday, yday, isdst) = getdate(string);
getdate_err() returns the value of the getdate_err variable.
egid = getegid();
euid = geteuid();
gid = getgid();
hostid = gethostid();
hostname = gethostname();
(int_sec, int_usec, val_sec, val_usec) = getitimer(which);
which is one of ITIMER_REAL, ITIMER_VIRTUAL, ITIMER_PROF.
prio = getpriority(which, who);
which can be one of PRIO_PROCESS, PRIO_PGRP, PRIO_USER, defaults to PRIO_PROCESS.
who defaults to 0.
Returns undef on error.
sid = getsid(pid);
pid defaults to 0.
uid = getuid();
(user, id, line, pid, type, sec, usec) = getutxent();
getutxent() reads a line from the current file position in the utmp file.
(user, id, line, pid, type, sec, usec) = getutxid(ut_type, ut_id);
getutxid() searches forward from the current file position in the utmp file based upon ut_type and ut_id. If ut_type is one of RUN_LVL, BOOT_TIME, NEW_TIME, or OLD_TIME, getutxid() will find the first entry whose ut_type field matches ut_type. If ut_type is one of INIT_PROCESS, LOGIN_PROCESS, USER_PROCESS, or DEAD_PROCESS, getutxid() will find the first entry whose ut_id field matches ut_id.
(user, id, line, pid, type, sec, usec) = getutxline(ut_line);
getutxline() searches forward from the current file position in the utmp file. It scans entries whose ut_type is USER_PROCESS or LOGIN_PROCESS and returns the first one whose ut_line field matches ut_line.
r = hypot(x, y);
y = ilogb(x);
Like POSIX::isalpha() but returns 0 for the empty string.
Like POSIX::iscntrl() but returns 0 for the empty string.
Like POSIX::isdigit() but returns 0 for the empty string.
isfinite(x);
Like POSIX::isgraph() but returns 0 for the empty string.
isinf(x);
Like POSIX::islower() but returns 0 for the empty string.
isnan(x);
isnormal(x);
Like POSIX::isprint() but returns 0 for the empty string.
Like POSIX::ispunct() but returns 0 for the empty string.
Like POSIX::isspace() but returns 0 for the empty string.
Like POSIX::isupper() but returns 0 for the empty string.
Like POSIX::isxdigit() but returns 0 for the empty string.
y = j0(x);
j0() is the Bessel function of the first kind of order 0.
y = j1(x);
j1() is the Bessel function of the first kind of order 1.
y = jn(n, x);
jn() is the Bessel function of the first kind of order n.
(r, X0, X1, X2) = jrand48(X0, X1, X2);
ret = killpg(pgrp, sig);
s = l64a(n);
y = ldexp(x, exp);
(quot, rem) = ldiv(numer, denom);
y = lgamma(x);
ret = link(path1, path2);
ret = linkat(fd1, path1, fd2, path2, flags=0);
flags can be 0 or AT_SYMLINK_FOLLOW.
y = log1p(x);
y = log2(x);
y = logb(x);
r = lrand48();
ret = lstat(path);
ret = mkdir(path, mode);
ret = mkdirat(fd, path, mode);
name = mkdtemp(template);
ret = mkfifo(path, mode);
ret = mkfifoat(fd, path, mode);
ret = mknod(path, mode, dev);
ret = mknodat(fd, path, mode, dev);
(fd, name) = mkstemp(template);
mrand48();
(rem_sec, rem_nsec) = nanosleep(sec, nsec);
y = nearbyint(x);
z = nextafter(x, y);
r = nrand48()
ret = open(path, oflag[, mode]);
oflag defaults to O_RDONLY, mode defaults to 0600.
ret = openat(fd, path, oflag[, mode]);
If fd is numeric (i.e. a file descriptor), openat() returns a file descriptor. If fd is a file or directory handle the return value is also a handle whose type depends on the file type of path: If path is a directory, the return value is a directory handle, otherwise it's a file handle.
bytes_read = pread(fd, buf, file_offset, nbytes[, buf_offset]);
pread() reads nbytes bytes of data from the file descriptor fd at file offset offset into the scalar buf without changing the file offset. buf will be enlarged automatically if necessary.
pread() treats buf just like sysread() does: buf_offset may be specified to place the read data at that position in buf. Defaults to 0. If buf_offset is past the end of buf, buf will be padded with zeros before appending the data. If buf_offset is negative, it is counted from the end of the string. If buf_offset plus bytes_read does not exceed the current string length of buf, buf will be truncated accordingly. This latter detail is missing from the sysread() documentation.
sysread()
Returns the number of bytes read, 0 at EOF, undef on error.
Note that pread() deals with bytes not characters.
name = ptsname(fd);
bytes_written = pwrite(fd, buf, offset[, nbytes, buf_offset]);
pwrite() writes data from the scalar buf to the file descriptor fd at file offset offset without changing the file offset. The file referenced by fd must be capable of seeking.
nbytes may be specified to write only that much bytes. If not specified or undef, everything from buf_offset up to the end of buf is written.
buf_offset may be specified to write data from that position in buf. Defaults to 0. If buf_offset is negative it is counted from the end of the string.
Returns the number of bytes written, undef on error.
Note that pwrite() deals with bytes not characters.
On Linux, if a file is opened with O_APPEND, pwrite() appends data to the end of the file, regardless of the value of offset (in violation of POSIX).
r = random();
ret = read(fd, buf, nbytes);
Like POSIX::read() but returns 0 at EOF instead of "0 but true".
name = readlink(path);
name = readlinkat(dirfd, path);
r = remainder(x, y);
ret = remove(path);
Like POSIX::remove() but calls the C function instead of doing it in Perl.
ret = rename(old, new);
ret = renameat(olddirfd, oldpath, newdirfd, newpath);
r = round(x);
y = scalbn(x, n);
(old_seed1, old_seed2, old_seed3) = seed48(seed1, seed2, seed3);
ret = setegid(gid);
ret = seteuid(uid);
ret = setgid(gid);
(old_int_sec, old_int_usec, old_val_sec, old_val_usec) = setitimer(which, int_sec, int_usec, val_sec, val_usec);
ret = setpriority(value, which, who);
Returns true on success, undef on error.
ret = setregid(rgid, egid);
ret = setreuid(ruid, euid);
ret = setuid(uid);
setutxent();
ret = sighold(sig);
ret = sigignore(sig);
b = signbit(x);
sigpause(sig);
ret = sigrelse(sig);
y = sinh(x);
srand48(seedval);
srandom(seed);
(dev, ino, mode, nlink, uid, gid, rdev, size, atim_sec, mtim_sec, ctim_sec, blksize, blocks, atim_nsec, mtim_nsec, ctim_nsec) = stat(path);
(sec, min, hour, mday, mon, year, wday, yday, isdst) = strptime(s, format[, sec, min, hour, mday, mon, year, wday, yday, isdst]);
strptime() converts the string s into a broken-down time according to the format string format. The time fields may optionally be initialized in whole or in part and will be returned as initialized if they are not affected by the format string. Unprocessed uninitialized or undef fields are returned as undef.
Returns an empty list on error.
In scalar context returns the index of the first byte in s that was not processed or the byte length of s if the whole string was consumed or undef on error.
As strptime() acts on null-terminated strings, strings containing NUL bytes will only be processed up to the first NUL byte.
symlink(old, new);
ret = symlinkat(old, dirfd, new);
sync();
y = tan(x);
y = tanh(x);
y = tgamma(x);
ret = truncate(path, length);
y = trunc(x);
ret = unlinkat(dirfd, path, flags=0);
flags can be 0 or AT_REMOVEDIR.
ret = unlink(path);
ret = utimensat(dirfd, path, flags, atime_sec, atime_nsec, mtime_sec, mtime_nsec);
flags can be 0 or AT_SYMLINK_NOFOLLOW, defaults to 0.
atime_sec and mtime_sec default to 0. atime_nsec and mtime_nsec default to UTIME_NOW.
ret = write(fd, buf[, nbytes]);
Like POSIX::write() but returns 0 instead of "0 but true" if 0 bytes were written, and it does not write more bytes than buf contains.
If nbytes is omitted, it defaults to the length of buf
y = y0(x);
y0() is the Bessel function of the second kind of order 0.
y = y1(x);
y1() is the Bessel function of the second kind of order 1.
y = yn(n, x);
yn() is the Bessel function of the second kind of order n.
This module does not export anything by default. The following export tags are available:
:at All *at() functions like openat() etc. plus all AT_ constants :id All get/set*id() functions like getuid() etc. :is All is* functions like isdigit() etc. :prw pread() and pwrite() :clock All clock_* functions like clock_gettime() etc. plus all CLOCK_ constants
AT_EACCESS AT_EMPTY_PATH AT_FDCWD AT_NO_AUTOMOUNT AT_REMOVEDIR AT_SYMLINK_FOLLOW AT_SYMLINK_NOFOLLOW BOOT_TIME CLOCK_MONOTONIC CLOCK_MONOTONIC_RAW CLOCK_PROCESS_CPUTIME_ID CLOCK_REALTIME CLOCK_THREAD_CPUTIME_ID _CS_GNU_LIBC_VERSION _CS_GNU_LIBPTHREAD_VERSION _CS_PATH DEAD_PROCESS FNM_CASEFOLD FNM_FILE_NAME FNM_LEADING_DIR FNM_NOESCAPE FNM_NOMATCH FNM_PATHNAME FNM_PERIOD FP_INFINITE FP_NAN FP_NORMAL FP_SUBNORMAL FP_ZERO INIT_PROCESS ITIMER_PROF ITIMER_REAL ITIMER_VIRTUAL LOGIN_PROCESS NEW_TIME O_CLOEXEC O_DIRECTORY O_EXEC OLD_TIME O_NOFOLLOW O_RSYNC O_SEARCH O_SYNC O_TMPFILE O_TTY_INIT RTLD_GLOBAL RTLD_LAZY RTLD_LOCAL RTLD_NOW RUN_LVL TIMER_ABSTIME USER_PROCESS UTIME_NOW UTIME_OMIT
Initially hacked together by Carsten Gaebler.
This library is free software. You can redistribute and/or modify it under the terms of the Do What The Fuck You Want To Public License, Version 2, as published by Sam Hocevar. See the COPYING file or http://www.wtfpl.net/ for more details.
To install POSIX::2008, copy and paste the appropriate command in to your terminal.
cpanm
cpanm POSIX::2008
CPAN shell
perl -MCPAN -e shell install POSIX::2008
For more information on module installation, please visit the detailed CPAN module installation guide.