my @pcnames;
foreach my $objItem (in $colItems) {
   next unless $objItem->{Description} eq "...";
   push(@pcnames, $objItem->{DNSHostName});
}