会python真的可以为所欲为0(回)
359天前
这里还有人吗1(回)
544天前这里还有人吗0(回)
544天前
每天面对着电脑屏幕，敲打键盘。我所面对的并不只是代码，而是一种生活方式。0(回)
769天前到处都是羊，不想上班0(回)
849天前
鸽子
0(回)
853天前#----------------------------- |
$rin = ''; |
# repeat next line for all filehandles to poll |
vec($rin, fileno(FH1), 1) = 1; |
vec($rin, fileno(FH2), 1) = 1; |
vec($rin, fileno(FH3), 1) = 1; |
$nfound = select($rout=$rin, undef, undef, 0); |
if ($nfound) { |
# input waiting on one or more of those 3 filehandles |
if (vec($rout,fileno(FH1),1)) { |
# do something with FH1 |
} |
if (vec($rout,fileno(FH2),1)) { |
# do something with FH2 |
} |
if (vec($rout,fileno(FH3),1)) { |
# do something with FH3 |
} |
} |
#----------------------------- |
use IO::Select; |
$select = IO::Select->new(); |
# repeat next line for all filehandles to poll |
$select->add(*FILEHANDLE); |
if (@ready = $select->can_read(0)) { |
# input waiting on the filehandles in @ready |
} |
#----------------------------- |
$rin = ''; |
vec($rin, fileno(FILEHANDLE), 1) = 1; |
$nfound = select($rin, undef, undef, 0); # just check |
if ($nfound) { |
$line = <FILEHANDLE>; |
print "I read $line"; |
} |
#----------------------------- |
