Next SOAP::Lite Client Experiences 9

Getting a List


     my $recordListSom = $soap->getRecordListForTable(
         SOAP::Data->name( "cookie"     => $cookie ),
         SOAP::Data->name( "tablename"  => "Defect" ),
         SOAP::Data->name( "filtername" => 'Assigned with Estimated Date' ),
         SOAP::Data->name( "columnList" => '');

     if ( $recordListSom->fault ) {
         my $faultstring = $logonSom->faultstring;
         die "Fault string : $faultstring \n";
     }

     my @items   = $recordListSom->valueof('//Envelope/Body/getRecordListForTableResponse/recordlist/records/item/row/item');
     my @columns = $recordListSom->valueof('//Envelope/Body/getRecordListForTableResponse/recordlist/columnlist/item');

     my $columnCount = scalar(@columns);
     my $recordCount = scalar(@items) / $columnCount if $columnCount;

Copyright © 2004 David Baird