Select Code to Download

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

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