ReWrite HTTP Post

when HTTP_REQUEST {
   set my_uri [HTTP::uri]
   set my_host [HTTP::host]
   set my_query [HTTP::query]
   if { [ matchclass $my_uri contains $::gms_splitout_reports_perf2_class] } {
      if { $my_uri starts_with "/dbauth/plsql" } {
         set my_new_path [string map {"dbauth/plsql" "dbauth/rpt"}  $my_uri]
         log local0. "SWITCHING: http://$my_host$my_new_path"
         log local0. "URI Query: $my_query"
         HTTP::uri $my_new_path
      } else {
         log local0. "URL: http://$my_host$my_uri"
         pool gms_app_qa_perf_temp_pool
      }
   } else { if { $my_uri starts_with "/dbauth/rpt" } {
         set my_new_path [string map {"dbauth/rpt" "dbauth/plsql"}  $my_uri]
         HTTP::uri $my_new_path
      } else {
        pool gms_app_qa_perf_temp_pool
      }
   }
}