Mknod - Perl extension for the mknod(2) call
use Mknod;
# create a pipe
mknod('hole', S_IFIFO|0644);
# or a device
mknod('ttyS0', S_IFCHR|0644, 4|64);
It seemed to me this system call wasnt available to perl yet.
If I was just looking in the wrong place, please let me know:)
Returns 1 on ok and 0 on failure.
mknod()
S_IFREG
S_IFIFO
S_IFBLK
S_IFCHR
This behaviour can be prevented:
use Mknod ();
Mknod::mknod(...)
Raoul Zwart, <rlzwart@cpan.org<gt>
Copyright 2003 by Raoul Zwart
This library is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.