$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;