Changeset 9747 in ntrip for trunk/BNC/scripts/Common.pm

Timestamp:

Jun 1, 2022, 11:45:39 AM (23 months ago)

Author:

wiese

Message:

ADD: minor in helper scripts

File:

• trunk/BNC/scripts/Common.pm (modified) (1 diff)

trunk/BNC/scripts/Common.pm

@@ -46 +46 @@
     my $stderr = getContent($tmpfile);
     return ( $exit_code, $stdout, $stderr );
+}
+
+sub mkDir {
+    my $dir = shift;
+    return 1 if ( -d $dir );
+
+    eval { mkpath($dir) };
+    if ($@) {
+        warn("Could not create path [$dir]: $@");
+        return 0;
+    }
+    return 1;
 }