- ZOOM::Log::log("pod", "connection ", $i-1, ": ", ZOOM::event_str($ev));
+ my $evstr = ZOOM::event_str($ev);
+ ZOOM::Log::log("pod", "connection ", $i-1, ": $evstr");
+
+ eval {
+ $conn->_check();
+ }; if ($@) {
+ my $sub = $this->{callback}->{exception};
+ die $@ if !defined $sub;
+ $res = &$sub($conn, $this->{state}->[$i-1],
+ $this->{rs}->[$i-1], $@);
+ last if $res != 0;
+ next;
+ }
+