Changeset 701

Timestamp:

Oct 6, 2009, 11:42:39 AM (10 years ago)

Author:

sheldon

Message:

Uppercase postcodes on export as it doesn't appear to be enforced in the DB

File:

• trunk/npemap.org.uk/scripts/exporter/updatePostcodeine.pl (modified) (1 diff)

trunk/npemap.org.uk/scripts/exporter/updatePostcodeine.pl

@@ -65 +65 @@
     $e =~ s/^(\d+)\.\d+$/$1/;
     $n =~ s/^(\d+)\.\d+$/$1/;
-    my $pcode = $outer;
+    my $pcode = uc($outer);
     if (length($pcode) > 2 && $e && $n) {
             print OUT "\"$pcode\",$e,$n\n";