Changeset 8214 in genesis

Timestamp:

Aug 3, 2010, 10:06:58 AM (14 years ago)

Author:

rick

Message:

Make RDNAP convertion optional, as it not installed by default and somehow hard to get sometimes

File:

• nodes/genesis-to-py.pl (modified) (2 diffs)

nodes/genesis-to-py.pl

@@ -1 +1 @@
 #!/usr/bin/env perl
-use Geo::Coordinates::RDNAP qw/from_rd to_rd dms/;
 
+eval {
+  require Geo::Coordinates::RDNAP;
+};
+if (! $@) {
+  print "Foo";
+  Geo::Coordinates::RDNAP->import(qw/from_rd to_rd dms/);
+} else {
+  print STDERR "[WARN] Geo::Coordinates::RDNAP not installed\n";
+  sub from_rd {
+    return (0,0,0);
+  }
+}
 
 # RD X,Y -> RD Noorderbreedte, Oosterbreedte
@@ -11 +22 @@
 $argc = $#ARGV + 1;
 if ($argc == 0) {
-  print "Usage $_ <wleiden.conf> ...\n";
+  print STDERR  "Usage $_ <wleiden.conf> ...\n";
   exit 1;
 # Hack to easy support multiple files without remembering any variable in between