+
+ if ( h2str($reqpdu) eq $last_reqpdu ) {
+ warn "# cache hit";
+ print $clientsocket $last_respdu || return 0;
+ return 1;
+ }
+
+ my $request = $LDAPRequest->decode($reqpdu);
+ warn "## request = ",dump($request);
+
+ $reqpdu = modify_request($reqpdu, $request);