perlfaq nodetype
faq_monk
<P>
If you're lucky enough to be using a system that supports non-blocking reads (most Unixish systems do), you need only to use the
<FONT SIZE=-1>O_NDELAY</FONT> or
<FONT SIZE=-1>O_NONBLOCK</FONT> flag from the Fcntl module in conjunction with
<CODE>sysopen():</CODE>
<P>
<PRE> use Fcntl;
sysopen(FH, "/tmp/somefile", O_WRONLY|O_NDELAY|O_CREAT, 0644)
or die "can't open /tmp/somefile: $!":
</PRE>
<P>