Perl Script to check GTM Wideip and its associated Pool status

Problem this snippet solves: This Perl script will query the status and state of Wideip and its Associated Pool and pool member state How to use this snippet: gtmstate.pl < gtmsyncmember> < user...