Get ALL virtual server names?

hey guys,

 

I ran into problems while using the Codeshare example you just mentionned.

 

Basically, this perl script will build a list of all VS declared (be them "standard" VS, Forwarding (L2 or IP) VS, etc..). These VS might not have a default pool assigned, and in such cases the perl script will end when receiving an error from iControl. You get the error as soon as you try to get_default_pool_name with an empty pool name.

 

To work around this issue, I rewrote most of this script to take that VS type problem into account. (see attachment to the post, but bear in mind that it's still Work In Progress, and I'm a very casual dev :p).

 

Now I still have two problems: 1/running this script against a redundant system with over 180 VS takes more than 3 minutes to complete. 2/ On systems with partitions, I only get to see infos from the Common Partition.

 

I'm still struggling with 2, get_partition_list doesn't seem to return the "All (read-only)" option that I have when using the Web UI. I hope this doesn't get off topic but if one of you has ideas on how I could mimic this "All (read-only)" feature with iControl, I'm interested.

 

Same thing for ideas on how to make this script run faster !

 

tia,

 

jethro