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
shiny regexes and rules offered by Perl 6
other CPAN module
by looking at it on my monitor
I print it and I read it in spare time
first I convert it into $FORMAT, then I parse it
I hire someone to do it
using my custom module
I write a brand new language to do the task
on the server where I play as human, XML is forbidden
what is XML?
I speak XML natively
I write a new grammar for Perl 6
some other way
Results (433 votes),