NAME

Geo::Geos::GeometryFactory - Supplies a set of utility methods for building Geometry objects.

SYNOPSIS

    use Geo::Geos::GeometryFactory qw/create/;

    # constructors
    my $gf1 = create();                             # => isa 'Geo::Geos::GeometryFactory'

    use Geo::Geos::PrecisionModel;
    my $pm = Geo::Geos::PrecisionModel->new(TYPE_FLOATING_SINGLE);
    my $gf2 = Geo::Geos::GeometryFactory::create($pm);   # => isa 'Geo::Geos::GeometryFactory'
    $gf2->getPrecisionModel;                             # => isa 'Geo::Geos::PrecisionModel'

    my $srid = 3857;
    my $gf3 = Geo::Geos::GeometryFactory::create($pm, 3857);     # => isa 'Geo::Geos::GeometryFactory'
    $gf3->getSRID;                                          # => 3857

    use Geo::Geos::Envelope;
    my $gf = Geo::Geos::GeometryFactory::create;
    $gf->toGeometry(Geo::Geos::Envelope->new(1, 2, 3, 4));       # => isa 'Geo::Geos::Geometry'

    # geometry constructors
    $gf->createEmptyGeometry;       # => isa 'Geo::Geos::Geometry'
    $gf->createGeometryCollection;  # => isa 'Geo::Geos::GeometryCollection'

    my $c = Geo::Geos::Coordinate->new(1,2);
    $gf->createPoint;               # => isa 'Geo::Geos::Point'
    $gf->createPoint($c);           # => isa 'Geo::Geos::Point'
    $gf->createPoint([$c], 2);      # => isa 'Geo::Geos::Point'

    my $c1 = Geo::Geos::Coordinate->new(1,2);
    my $c2 = Geo::Geos::Coordinate->new(5,2);
    $gf->createMultiPoint;                  # => isa 'Geo::Geos::MultiPoint'
    $gf->createMultiPoint([$c1, $c2], 2);   # => isa 'Geo::Geos::MultiPoint'

    $gf->createLineString;                  # => isa 'Geo::Geos::LineString'
    $gf->createLineString([$c1, $c2], 2);   # => isa 'Geo::Geos::LineString'

    my $c11 = Geo::Geos::Coordinate->new(1,2);
    my $c12 = Geo::Geos::Coordinate->new(5,2);
    my $c21 = Geo::Geos::Coordinate->new(10,2);
    my $c22 = Geo::Geos::Coordinate->new(15,2);
    my $l1 = $gf->createLineString([$c11, $c21], 2);
    my $l2 = $gf->createLineString([$c21, $c22], 2);
    $gf->createMultiLineString;                 # => isa 'Geo::Geos::MultiLineString'
    $gf->createMultiLineString([$l1, $l2]);     # => isa 'Geo::Geos::MultiLineString'

    my $cr1 = Geo::Geos::Coordinate->new(1,2);
    my $cr2 = Geo::Geos::Coordinate->new(5,2);
    my $cr3 = Geo::Geos::Coordinate->new(5,0);
    my $cr4 = Geo::Geos::Coordinate->new(1,0);
    $gf->createLinearRing;                                      # => isa 'Geo::Geos::LinearRing'
    $gf->createLinearRing([$cr1, $cr2, $cr3, $cr4, $cr1], 2);   # => isa 'Geo::Geos::LinearRing'

    my $lr = $gf->createLinearRing([$cr1, $cr2, $cr3, $cr4, $cr1], 2);
    $gf->createPolygon;         # => isa 'Geo::Geos::Polygon'
    $gf->createPolygon($lr);    # => isa 'Geo::Geos::Polygon'

    my $cr2_1 = Geo::Geos::Coordinate->new(10,2);
    my $cr2_2 = Geo::Geos::Coordinate->new(15,2);
    my $cr2_3 = Geo::Geos::Coordinate->new(15,0);
    my $cr2_4 = Geo::Geos::Coordinate->new(10,0);
    my $lr2 = $gf->createLinearRing([$cr2_1, $cr2_2, $cr2_3, $cr2_4, $cr2_1], 2);
    my $p1 = $gf->createPolygon($lr);
    my $p2 = $gf->createPolygon($lr2);
    $gf->createMultiPolygon;                # => isa 'Geo::Geos::MultiPolygon'
    $gf->createMultiPolygon([$p1, $p2]);    # => isa 'Geo::Geos::MultiPolygon'

SEE ALSO (C++ classes docs)

GEOS C++ Library

geos::geom::GeometryFactory

SEE ALSO

Geo::Geos

Geo::Geos::Geometry

Geo::Geos::GeometryCollection

Geo::Geos::LinearRing

Geo::Geos::LineString

Geo::Geos::MultiLineString

Geo::Geos::MultiPoint

Geo::Geos::MultiPolygon

Geo::Geos::Point

Geo::Geos::Polygon

Geo::Geos::Prep::GeometryFactory

AUTHOR

Ivan Baidakou <i.baydakov@crazypanda.ru>, Crazy Panda, CP Decision LTD

LICENSE

You may distribute this code under the same terms as Perl itself.