Is there an IO :: Select in Windows working with file descriptors?
$pid = open $handle, "-|", "$_command" || die "Cannot run $_command";
my $s = IO::Select->new();
$s->add($handle);
$s->add(\*STDIN);
while (1) {
@ready = $s->can_read(30);
if (scalar(@ready) > 0) {
}
else {
}
}
My script continuously prints something on the screen, open, the command runs in the background, but can_readalways fails on Windows. Any help?
source
share