Re^3: sysread blocking ??

in reply to Re^2: sysread blocking ??
in thread sysread blocking ??

I would have used:

if (!defined($stat)) {
   if $!{EAGAIN} || $!{EWOULDBLOCK}) {
      ... No data at this time ...
   }

   die "sysread: $!\n";
}

if (!$stat) {
   ... EOF ...
)
[download]

Comment on Re^3: sysread blocking ?? Download Code

In Section Seekers of Perl Wisdom