get_persistence_record

Hi Joe,

 

 

The problem im having is parsing the output arrays. After trying your example and other methods of accessing the 2D array from the link provided and various books, it always seems to fail at the inner loop.

 

 

one example:

 

 

$persistence_mode = "PERSIST_MODE_NONE";

 

$soapResponse = $Pool->get_persistence_record

 

(

 

SOAP::Data->name(pool_names => [@pool_list]),

 

SOAP::Data->name(persistence_modes => [$persistence_mode])

 

);

 

&checkResponse($soapResponse);

 

@PersistenceRecordLists = @{$soapResponse->result};

 

 

print "$PersistenceRecordLists\n";

 

for $i (0 .. $PersistenceRecordLists)

 

{

 

$PersistenceRecordList = $PersistenceRecordLists[$i];

 

print "$PersistenceRecordList\n";

 

for $j (0 .. ${$PersistenceRecordList}) {

 

print "element $i $j is $pool_namestenceRecordList->[$j]\n";

 

}

 

}

 

 

example output:

 

0

 

-1

 

 

Is there something im missing or doing wrong? Any Ideas/help would be greatly appreciated.