Changeset 370 for trunk/npemap.org.uk

Timestamp:

Nov 19, 2006, 11:09:35 AM (14 years ago)

Author:

David Sheldon

Message:

Add json output mode.

File:

• trunk/npemap.org.uk/cgi/geocoder.fcgi (modified) (2 diffs)

trunk/npemap.org.uk/cgi/geocoder.fcgi

@@ -32 +32 @@
 
 
-my @outputs = qw(text xml);
+my @outputs = qw(text xml js);
 
 my $cgi;
@@ -116 +116 @@
                 print "  <postcode>$pc</postcode>\n";
                 print "</geocoder>\n";
-        } else {
+        } elsif ($output eq "js") {
+                print header("text/javascript");
+        my ($e, $n) = (int($easting), int($northing));
+          if(defined $cgi->param("method")) {
+          print ($cgi->param("method") . "(");
+      }
+      print "{ pc: \"$pc\", e: $e, n: $n }";
+          if(defined $cgi->param("method")) {
+          print ");";
+      }
+      print "\n";
+       
+    } else {
                 print header("text/plain");
                 print "# Easting,Northing,Matched Postcode\n";