The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Geo::JSON::Polygon

SYNOPSIS

    use Geo::JSON::Polygon;
    my $pg = Geo::JSON::Polygon->new({
        coordinates => [ [ 51.50101, -0.14159 ], ... ],
                       [ [ 54.0, 0 ], ... ],
    });
    my $json = $pg->to_json;

DESCRIPTION

A GeoJSON object with a coordinates attribute of an arrayref of arrayrefs of positions. This represents a multiple LinearRing coordinate arrays, the first defining the exterior ring or the polygon, and the others any interior ring(s) or holes.

See Geo::JSON for more details.