Help for this page

Select Code to Download


  1. or download this
    my $items = $farmdetails->{FarmRoleSet}{Item};
    for my $item (@$items) {
    ...
        my $ExternalIP = $item->{ServerSet}{Item}{ExternalIP};
        my $InstanceID = $item->{ServerSet}{Item}{PlatformProperties}{Inst
    +anceID};
    }
    
  2. or download this
    print Dumper($farmdetails->{FarmRoleSet}{Item}[0]);
    print Dumper($farmdetails->{FarmRoleSet}{Item}[0]{ServerSet});
    ...
        print Dumper($item);
        print Dumper($item->{ServerSet});
    }