$iologger->debug("socket blocking state ", $sock->blocking()); my $l = <$sock>; my $err = $!; $iologger->debug("Client input call err ", safe($err), " line ", safe($l)); if (!defined($l)) { my $d = Dumper($sock); $iologger->debug("Socket at error: $d"); die "eiread failed: $err"; } $iologger->info("Client input: ", safe($l)); return $l; #### 2011-09-27 17:23:14,723 INFO simkserver: Accepted cmdcnt 1 starttime 17:23:14 2011-09-27 17:23:14,744 DEBUG simkserver.io: socket blocking state 1 2011-09-27 17:23:14,745 DEBUG simkserver.io: Client input call err Bad file desc riptor line Proxy,127.0.0.1 2011-09-27 17:23:14,746 INFO simkserver.io: Client input: Proxy,127.0.0.1 2011-09-27 17:23:14,746 INFO simkserver: Connection is from proxy for 127.0.0.1 2011-09-27 17:23:14,747 DEBUG simkserver.io: socket blocking state 1 2011-09-27 17:23:14,747 DEBUG simkserver.io: Client input call err Bad file desc riptor line foo,3 2011-09-27 17:23:14,748 INFO simkserver.io: Client input: foo,3 2011-09-27 17:23:14,748 DEBUG simkserver: command foo arg1 3 2011-09-27 17:23:14,749 DEBUG simkserver.io: socket blocking state 1 2011-09-27 17:23:16,557 DEBUG simkserver.io: Client input call err Bad file desc riptor line h1,h2 2011-09-27 17:23:16,574 INFO simkserver.io: Client input: h1,h2 2011-09-27 17:23:16,575 DEBUG simkserver.io: socket blocking state 1 2011-09-27 17:23:16,575 DEBUG simkserver.io: Client input call err [empty] line [undef] 2011-09-27 17:23:16,576 DEBUG simkserver.io: Socket at error: $VAR1 = bless( \*S ymbol::GEN1, 'IO::Socket::INET' ); 2011-09-27 17:23:16,577 ERROR simkserver: Aborted transaction on exception eirea d failed: at ./simkserver line 103, line 3.