This is working fine on my environment.use strict; use warnings; use IO::Handle; open my $WHOIS, "whois x.x.x.x 2>&1 |"; my $io = IO::Handle->new; $io->fdopen($WHOIS, "r"); $io->autoflush(1); while(my $line = $io->getline){ print $line; } $io->close;
In reply to Re^3: Non-buffered read from program
by myuji
in thread Non-buffered read from program
by arc_of_descent
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |