Geo-OGC-Service-WFS

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "Carp" : "0",
            "Clone" : "0",
            "DBI" : "0",
            "Data::Dumper" : "0",
            "File::Basename" : "0",
            "File::MkTemp" : "0",
            "Geo::GDAL" : "2.01",
            "Geo::OGC::Service" : "0.09",
            "HTTP::Date" : "0",
            "JSON" : "0",
            "Modern::Perl" : "0",
            "XML::LibXML::PrettyPrint" : "0",
            "perl" : "5.012000"
         }
      },
      "test" : {
         "requires" : {
            "DBD::Pg" : "0",
            "DBI" : "0",
            "Geo::OGC::Service" : "0.09",
            "HTTP::Request::Common" : "0",
            "Modern::Perl" : "0",
            "Plack::Test" : "0",
            "Test::More" : "0",
            "XML::LibXML" : "0",
            "XML::LibXML::PrettyPrint" : "0",
            "XML::SemanticDiff" : "0",
            "strict" : "0",
            "warnings" : "0"
         }
      }
   },

META.yml  view on Meta::CPAN

---
abstract: 'Perl extension for geospatial web feature services'
author:
  - 'Ari Jolma <ari.jolma at gmail.com>'
build_requires:
  DBD::Pg: '0'
  DBI: '0'
  ExtUtils::MakeMaker: '0'
  Geo::OGC::Service: '0.09'
  HTTP::Request::Common: '0'
  Modern::Perl: '0'
  Plack::Test: '0'
  Test::More: '0'
  XML::LibXML: '0'
  XML::LibXML::PrettyPrint: '0'
  XML::SemanticDiff: '0'
  strict: '0'
  warnings: '0'
configure_requires:
  ExtUtils::MakeMaker: '0'
dynamic_config: 1

META.yml  view on Meta::CPAN

  Carp: '0'
  Clone: '0'
  DBI: '0'
  Data::Dumper: '0'
  File::Basename: '0'
  File::MkTemp: '0'
  Geo::GDAL: '2.01'
  Geo::OGC::Service: '0.09'
  HTTP::Date: '0'
  JSON: '0'
  Modern::Perl: '0'
  XML::LibXML::PrettyPrint: '0'
  perl: '5.012000'
version: '0.11'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

Makefile.PL  view on Meta::CPAN

WriteMakefile(
    NAME              => 'Geo::OGC::Service::WFS',
    VERSION_FROM      => 'lib/Geo/OGC/Service/WFS.pm', # finds $VERSION, requires EU::MM from perl >= 5.5
    MIN_PERL_VERSION  => '5.012000',
    PM                => { 'lib/Geo/OGC/Service/WFS.pm' => '$(INST_LIBDIR)/WFS.pm',
                           'lib/Geo/OGC/Service/Filter.pm' => '$(INST_LIBDIR)/Filter.pm',
    },
    PREREQ_PM         => { "Carp" => 0,
                           "File::Basename" => 0,
                           "Modern::Perl" => 0,
                           "Capture::Tiny" => 0,
                           "Clone" => 0,
                           "JSON" => 0,
                           "DBI" => 0,
                           "Geo::GDAL" => 2.01, # to use streaming objects
                           "HTTP::Date" => 0,
                           "File::MkTemp" => 0,
                           "Data::Dumper" => 0,
                           "XML::LibXML::PrettyPrint" => 0, # for debugging
                           "Geo::OGC::Service" => 0.09,
    },
    TEST_REQUIRES     => { "strict" => 0,
                           "warnings" => 0,
                           "Modern::Perl" => 0,
                           "Test::More" => 0,
                           "Plack::Test" => 0,
                           "HTTP::Request::Common" => 0,
                           "XML::LibXML" => 0,
                           "XML::SemanticDiff" => 0,
                           "XML::LibXML::PrettyPrint" => 0,
                           "DBI" => 0,
                           "DBD::Pg" => 0,
                           "Geo::OGC::Service" => 0.09,
    },

lib/Geo/OGC/Service/Filter.pm  view on Meta::CPAN

package Geo::OGC::Service::Filter;

use Modern::Perl;
use Carp;
use Data::Dumper;
use Geo::OGC::Service;
use vars qw(@ISA);
push @ISA, qw(Geo::OGC::Service::Common);

require Exporter;
push @ISA, qw(Exporter);
our @EXPORT_OK = qw(filter2sql node2sql parse_tag parse_name strip get_integer latest_version);
our %EXPORT_TAGS = (all => \@EXPORT_OK);

lib/Geo/OGC/Service/WFS.pm  view on Meta::CPAN

=cut

package Geo::OGC::Service::WFS;

use 5.010000; # say // and //=
use feature "switch";
use utf8;
use Carp;
use File::Basename;
use Modern::Perl;
use Capture::Tiny ':all';
use Clone 'clone';
use JSON;
use DBI;
use Geo::GDAL;
use HTTP::Date;
use File::MkTemp;

use Data::Dumper;
use XML::LibXML::PrettyPrint;

t/filter.t  view on Meta::CPAN

use strict;
use warnings;
use Modern::Perl;

use Test::More tests => 6;
use XML::LibXML;
use XML::SemanticDiff;
BEGIN { use_ok('Geo::OGC::Service::WFS') };

my $xml = <<end;
<Filter xmlns="http://www.opengis.net/fes/2.0" xmlns:gml="http://www.opengis.net/gml/3.2">
  <BBOX>
    <ValueReference>