# # substr -- a function to emulate the ancient ksh builtin # # -l == remove shortest from left # -L == remove longest from left # -r == remove shortest from right (the default) # -R == remove longest from right substr() { local flag pat str local usage="usage: substr -lLrR pat string or substr string pat" local options="l:L:r:R:" OPTIND=1 while getopts "$options" c do case "$c" in l | L | r | R) flag="-$c" pat="$OPTARG" ;; '?') echo "$usage" return 1 ;; esac done if [ "$OPTIND" -gt 1 ] ; then shift $[ $OPTIND -1 ] fi if [ "$#" -eq 0 ] || [ "$#" -gt 2 ] ; then echo "substr: bad argument count" return 2 fi str="$1" # # We don't want -f, but we don't want to turn it back on if # we didn't have it already # case "$-" in "*f*") ;; *) fng=1 set -f ;; esac case "$flag" in -l) str="${str#$pat}" # substr -l pat string ;; -L) str="${str##$pat}" # substr -L pat string ;; -r) str="${str%$pat}" # substr -r pat string ;; -R) str="${str%%$pat}" # substr -R pat string ;; *) str="${str%$2}" # substr string pat ;; esac echo "$str" # # If we had file name generation when we started, re-enable it # if [ "$fng" = "1" ] ; then set +f fi }