diff options
author | Marius Halden <marius.h@lden.org> | 2015-01-26 18:13:55 +0100 |
---|---|---|
committer | Marius Halden <marius.h@lden.org> | 2015-01-26 18:13:55 +0100 |
commit | 1c5c685d0b0904e7ddc6e764e58e8fae08632d1d (patch) | |
tree | 559d5fddb743c1c083e23c9a3831efea92a240cb /bin/zurich/geocode | |
parent | 84de1b811a219c41adbdcc8b65851320a77e98f7 (diff) | |
parent | 04117b8be30b5d82d50cdc047ac4e7c19864f8ed (diff) |
Merge tag 'v1.5.3' into fiksgatami-dev
Diffstat (limited to 'bin/zurich/geocode')
-rwxr-xr-x | bin/zurich/geocode | 45 |
1 files changed, 0 insertions, 45 deletions
diff --git a/bin/zurich/geocode b/bin/zurich/geocode deleted file mode 100755 index 9482b27e6..000000000 --- a/bin/zurich/geocode +++ /dev/null @@ -1,45 +0,0 @@ -#!/usr/bin/perl - -=head1 NAME - -zurich/geocode - commandline tool to test the Zurich geocoder - -=head1 SYNOPSIS - - # Firstly: - ## copy the GEOCODER config from a current Zurich conf to your conf/general.yml - $ eval `perl setenv.pl` - - $ bin/zurich/geocode Magnus - - # ... output from geocoder - -This can be used to test the results of, e.g. - - https://www.zueriwieneu.ch/ajax/geocode?term=Magnus - -but without the caching which FixMyStreet applies, and passing on any 500 -errors from the server. - -=cut - -use strict; -use warnings; -require 5.8.0; - - -use Data::Dumper; -use feature 'say'; - -use FixMyStreet; -use FixMyStreet::App; -use FixMyStreet::Geocode::Zurich; - -# TODO use FixMyStreet::override_config to get data from conf/general.yml.zurich if available -my $geocoder = FixMyStreet->config('GEOCODER') - or die "No GEOCODER config -- please copy appropriate Zurich conf to conf/general.yml"; - -my $c = FixMyStreet::App->new(); -my $s = join ' ', @ARGV; - -say Dumper( FixMyStreet::Geocode::Zurich::string( $s, $c ) ); |