#!/usr/bin/ksh93
################################################################
#### Program: pwd_k93
####
#### Description: Emulation of the Unix "pwd" command
####
#### Author: Dana French (dfrench@mtxia.com)
#### Copyright 2004
####
#### Date: 07/28/2004
####
################################################################
function pwd_k93 {
typeset TRUE="0"
typeset FALSE="1"
typeset VERBOSE="${FALSE}"
typeset VERYVERB="${FALSE}"
while getopts ":vV" OPTION
do
case "${OPTION}" in
'v') VERBOSE="${TRUE}";;
'V') VERYVERB="${TRUE}";;
'?') print "Syntax: pwd_k93" && exit 1 ;;
esac
done
shift $(( ${OPTIND} - 1 ))
print -- "${PWD}"
return "${TRUE}"
}
################################################################
pwd_k93 "${@}"