Select Code to Download

add_path $HOME/bin
add_path $HOME/perl PERL5LIB

#    @(#)Copyright (c) 1991 Simon J. Gerraty
#
#    This file is provided in the hope that it will
...
pre_path() { [ -d ${1:-.} ] && no_path $* && eval ${2:-PATH}="$1:\$${2
+:-PATH}"; }
# if $1 is in path, remove it
del_path() { no_path $* || eval ${2:-PATH}=`eval echo :'$'${2:-PATH}: 
+| sed -e "s;:$1:;:;g" -e "s;^:;;" -e "s;:\$;;"`; }