500 errors

I have a BigIP, running 9.2.0. I get 500 errors trying to run

 

LocalLB.ProfilePersistence.set_timeout (i.e. the F5 is sending

 

500 errors back to SOAP...).

 

 

I'm using perl, but using the SOAP::Lite trace facility does

 

not seem to give me much useful information. I turned on the

 

trace information (iControl.LogLevel = trace), but it does not

 

give me any useful info either.

 

 

Rebooting the box clears this up (i.e. I can run the exact

 

same script, and it perform the setting of the timeout

 

without generating an error).

 

 

Any suggestions on how to track down what could be causing this?

 

 

Here's the code for review:

 

!/usr/bin/perl
use strict;
require "dumpvar.pl";
use SOAP::Lite +trace => qw(all);
my ($u, $p);
sub usage {
    print STDERR "testCaseForF5    \n";
}
sub SOAP::Transport::HTTP::Client::get_basic_credentials { return $u => $p; }
sub main {
    my ($ip, $n, $soap, $soapResponse, $r);
    return usage() if @ARGV != 4;
    $ip = $ARGV[0]; $u = $ARGV[1]; $p = $ARGV[2]; $n = $ARGV[3];
    $soap = SOAP::Lite->uri("urn:iControl:LocalLB/ProfilePersistence")
      ->proxy("https://$ip/iControl/iControlPortal.cgi") ||
      die "Can't create SOAP object for $ip\n";
    $soapResponse = $soap->set_timeout(
        SOAP::Data->name('profile_names' => [ $n ] ),
        SOAP::Data->name('timeouts'      => [ { 'value' => 600,
                                                'default_flag' => 0 } ]),
    );
    if ( $soapResponse->fault ) {
        print "SOAP Error: ",
          $soapResponse->faultcode, "; ",
          $soapResponse->faultstring , "\n";
        return 0;
    }
}
main;
1;