Help for this page
# FILE1 & FILE2 is a filehandle opened elsewhere. $read is a list of
# filehandles we are interested in reading
# (NOTE: $read=0 is very wrong)
vec($read, fileno(FILE1), 1) = 1; # Set the appropriate bit
vec($read, fileno(FILE2), 1) = 1; # And for another file...
my $nfound = select($read, undef, undef, undef);
# Does FILE1 have data waiting?
if (vec($read, fileno(FILE1), 1))
# ... do stuff ...
# Simple multiplexing package
# TCP listener socket
I make decisions, and my brain carries them out
My brain makes the decisions, and I observe them (if I'm lucky)
I make some decisions, and my brain makes others
My spouse makes decisions and I and my brain carry them out
I wrote a program to relieve me and my brain from the burden of decision-making
The black-helicopter people project the decisions into my brain and then I do as ordered
Results (488 votes),