Russell_Moore_8
Dec 04, 2010Nimbostratus
Perl iControl EAV to down pool if minimum members aren't available
First post to DevCentral though I've lurked a long time.
Much of this code was gleaned from other posts or examples so I only take credit for putting this together in this particular form.
The script is used as an EAV and you just set and pass environment variables to it.
The requirement I had was to detect if the number of active/up members dropped below "X" the entire pool should be disabled so the GTM would fail the service over to another site.
I welcome feedback and improvements. I'm still polishing it.
Edited to attach the code in a file.
I've already moved on and decide to re-write the whole thing in tmsh which I need to post as it is done and working properly.
Thanks Aaron for pointing out the formatting issue.