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

NAME

DBIx::Class::GeomColumns - Filter of geometry columns to access with WKT

SYNOPSIS

    package POI;
    __PACKAGE__->load_components(qw/GeomColumns Core/);
    __PACKAGE__->utf8_columns('wgs84_col',{'tokyo_col' => 4301});
    __PACKAGE__->kml_columns('kml_col');
    
    # Then belows return the result of 'AsText(wgs84_col)'
    $poi->wgs84_col;

    # You can also create or update 'GeomFromText($data,$srid)';
    # below example is insert 'GeomFromText('POINT(135 35)',4301)'
    $poi->tokyo_col('POINT(135 35)');
    $poi->update;

    # Access by KML geometry fragment 
    $poi->kml_col; 
    $poi->kml_col('<LineString><coordinates>135,35 136,36</coordinates></LineString>');
    $poi->update;

DESCRIPTION

This module allows you to access geometry columns by WKT or KML format.

METHODS

geom_columns

kml_columns

INTERNAL METHODS

set_geom_column

get_column

get_columns

store_column

DEPENDENCIES

Geo::Converter::WKT2KML.

DBIx::Class.

AUTHOR

OHTSUKA Ko-hei <nene@kokogiko.net>

COPYRIGHT

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

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