Hi I am trying to print out configuration names and their machine names in the following format:
Configuration Name
Available Machines:
-->Machine Name1
-->Machine Name2
I am able to get the configuration information from some sample code I found on the disscussion board, but I am unable to any of the machine information. Instead my code only returns a 1 where I think should be a hash reference. I've attached my code, but my main worry is this section of code:
foreach(@{$r->result->{'Configuration'}}){
print "Getting Machines For $_->{'name'}\n";
my @machines = $soap->ListMachines($auth_header, SOAP::Data->name('configurationID' => $_->{'id'})->type('s:int'));
print "Available Machines:\n";
my $machine;
foreach $machine (@machines){
print "$machine\n";
}
}
This script generates the following results:
Getting Machines For MGRIA_Test
Available Machines:
1
Getting Machines For auto_linux
Available Machines:
1
Getting Machines For Perl_5_8_9
Available Machines:
1
Getting Machines For auto_xp
Available Machines:
1
Getting Machines For auto_vista
Available Machines:
1
Getting Machines For defect
Available Machines:
1
Thanks for any help provided.