Yet Another CPAN Grep

Geo-Vector ( A/AJ/AJOLMA/Geo-Vector-0.52.tar.gz, AJOLMA, 2011; MetaCPAN )

Geo-Vector/lib/Geo/Vector.pm ( view source; MetaCPAN )

ame;
use Geo::GDAL;
use Geo::OGC::Geometry;
use Geo::Vector::Feature;
use Geo::Vector::Layer;
use JSON::XS;
use Gtk2;

use vars qw( @ISA %RENDER_AS );

our $VERSION = '0.52';

require Exporter;

@ISA

}) {
	    open my $fh, "<$params{features}";
	    my @a = <$fh>;
	    close $fh;
	    my $coder = JSON::XS->new->ascii->pretty->allow_nonref;
	    my $object = $coder->decode("@a");
	    if ($object->

res}}) {
		    $self->feature(Geo::Vector::Feature->new(GeoJSON => $o));
		}
	    } else {
		$self->feature(Geo::Vector::Feature->new(GeoJSON => $object));
	    }
	} else {	
	    for my $f (@{$params{