u

script_nuance/addpath.csh

@@ -0,0 +1,16 @@
+#!/bin/csh
+
+# usage: source addlibpath.csh new_path
+
+# this script requires a normalized $PATH: 
+# 1. each path except the last one must be followed by ":" without any whitespace; 
+# 2. each path is NOT finished by "/"
+# besides, the input parameter $1 is NOT finished by "/".
+# Purpose of the normalization is to match $ENV{NEWPATH}(:\|$)
+
+# it must be explicitly exported because Perl only add environment variables to %ENV, not those shell variables:
+setenv NEWPATH $1  
+# on windows, we must use /usr/bin/perl from cygwin, because ActivePerl doesn't work on following line:
+if ('no' == `/usr/bin/perl -e 'if ($ENV{PATH} =~ m|$ENV{NEWPATH}(:\|$)|) {exec "echo yes"} else {exec "echo no"}'`) then
+  setenv PATH ${1}:$PATH  # $1 must be enclosed with {}, otherwise it cannot be parsed.
+endif