Forum Discussion

jj24_43946's avatar
jj24_43946
Icon for Nimbostratus rankNimbostratus
Jun 23, 2011

Help with LocalLB::VirtualServer::add_rule

Hi there,   I'm trying to apply an existing iRule to an existing monitor. Though I don't get an error, I don't see the iRules being applied.     my DS looks like this:     ...
dev
devops
iControl
Joe_Pruitt's avatar
Joe_Pruitt
Jun 23, 2011
Here's how I've done it in the past.

sub addVSRule()
{
    my ($virtual, $rulename, $priority) = (@_);
    if ( ("" eq $virtual) or ("" eq $rulename) or ("" eq $priority) )
    {
        usage();
    }
    
    $VirtualServerRule = {
        rule_name => $rulename,
        priority => $priority
    };
    push @VirtualServerRuleList, $VirtualServerRule;
    push @VirtualServerRuleAofA, [@VirtualServerRuleList];
    
    $soapResponse = $VirtualServer->add_rule(
        SOAP::Data->name(virtual_servers => [$virtual]),
        SOAP::Data->name(rules => [@VirtualServerRuleAofA])
    );
    &checkResponse($soapResponse);
}

-Joe