Geo::GoogleEarth::Pluggable::Contrib::LinearRing - Geo::GoogleEarth::Pluggable LinearRing Object

Geo-GoogleEarth-Pluggable documentation Contained in the Geo-GoogleEarth-Pluggable distribution.

Index

Code Index:

NAME

Top

Geo::GoogleEarth::Pluggable::Contrib::LinearRing - Geo::GoogleEarth::Pluggable LinearRing Object

SYNOPSIS

Top

  use Geo::GoogleEarth::Pluggable;
  my $document=Geo::GoogleEarth::Pluggable->new();
  $document->LinearRing();

DESCRIPTION

Top

Geo::GoogleEarth::Pluggable::Contrib::LinearRing is a Geo::GoogleEarth::Pluggable::Placemark with a few other methods.

USAGE

Top

  my $placemark=$document->LinearRing(name=>"LinearRing Name",
                                   coordinates=>[[lat,lon,alt],
                                                 [lat,lon,alt],...]);

CONSTRUCTOR

Top

new

  my $placemark=$document->LinearRing();

METHODS

Top

subnode

BUGS

Top

Please log on RT and send to the geo-perl email list.

SUPPORT

Top

Try geo-perl email list.

AUTHOR

Top

  Michael R. Davis (mrdvt92)
  CPAN ID: MRDVT

COPYRIGHT

Top

This program is free software licensed under the...

  The BSD License

The full text of the license can be found in the LICENSE file included with this module.

SEE ALSO

Top

Geo::GoogleEarth::Pluggable, XML::LibXML::LazyBuilder, Geo::GoogleEarth::Pluggable::Placemark

Geo-GoogleEarth-Pluggable documentation Contained in the Geo-GoogleEarth-Pluggable distribution. 
package Geo::GoogleEarth::Pluggable::Contrib::LinearRing;
use base qw{Geo::GoogleEarth::Pluggable::Placemark};
use XML::LibXML::LazyBuilder qw{E};
use warnings;
use strict;

our $VERSION='0.09';


sub subnode {
  my $self=shift;
  my %data=%$self;
  $data{"tessellate"}=1 unless defined $data{"tessellate"};
  my $coordinates=$self->coordinates_stringify($data{"coordinates"});
  my @element=();
  push @element, E(tessellate=>{}, $data{"tessellate"});
  push @element, E(outerBoundaryIs=>{},
                   E(LinearRing=>{},
                     E(coordinates=>{}, $coordinates)));
  return E(Polygon=>{}, @element);
}


1;