Jon_Bartlett_10
Sep 17, 2008Historic F5 Account
Virtual Server Connection Limit
I am having some difficulties with trying to get, print and set the connection limit for a Virtual Server. Below is a snippet of where I am at. Any help would be greatly appreciated.
----------------------------------------------------------------------------
get connection limit
----------------------------------------------------------------------------
sub handle_get()
{
$soapResponse = $VirtualServer->get_connection_limit
(
SOAP::Data->name( virtual_servers => [$sVS] )
);
&checkResponse($soapResponse);
my @connectionlimit = @{$soapResponse->result};
$stat = @connectionlimit;
$type = $stat->{"type"};
$value = $stat->{"value"};
$low = $value->{"low"};
$high = $value->{"high"};
$value64 = ($high<<32)|$low;
print " Virtual Server: $sVS";
print " type: $type Connection Limit: $value64\n";
}
----------------------------------------------------------------------------
set connection limit
----------------------------------------------------------------------------
sub handle_set()
{
$soapResponse = $VirtualServer->set_connection_limit
(
SOAP::Data->name( virtual_servers => [$sVS] ),
SOAP::Data->name( limits => [$sLimit] )
);
&checkResponse($soapResponse);
}