foreach my $root (@docs){	
  foreach my $object (@$root) {
    print $object->toString();
  }
}

##</code><code>##

if ($size eq "1"){
  my @placemark = $doc->getElementsByTagName('Placemark');
  if(@placemark){
    @placemark = convertCoords(@placemark);
    }
  return [@folder];
}
else {
  my @placemark = $doc->getElementsByTagName('Placemark');
  @placemark = convertCoords(@placemark);
  return [@placemark];
  }