iRules for Individual Testing of Farm Servers

when HTTP_REQUEST {
   set myNode [findstr [HTTP::uri] "node=" 5 "&"]
      if {($myNode ne "") and ([LB::status pool http-pool-mypool member $myNode 80] eq "up")}{
      log "Node found."
      set used_pool_member 1
      pool http-pool-mypool member $myNode 80
   } else {
      log "Node not found."
      persist cookie
      pool http-pool-mypool
   }
}
when SERVER_CONNECTED {
   if { [info exists used_pool_member] && $used_pool_member } {
      persist cookie
   }
}