- or download this
my $rv = $handle->sysread($bufline, 4096);
$line .= $bufline;
...
$rv = $handle->sysread($bufline, 4096);
$line .= $bufline unless !$rv;
}
- or download this
- While there are handles from which to read,
- Wait for data to arrive.
...
- While the buf has a full command,
- Remove the command from the buf.
- Process the command.
- or download this
my $bufline = "";
my $rv = $handle->sysread($bufline, 4096);
$line .= $bufline;
- or download this
my $rv = $handle->sysread($line, 4096, length($line));