>>>>> "J" == John W Krahn <[EMAIL PROTECTED]> writes:
J> export PROMPT_COMMAND="perl 
J> -e'(\$_=qx[pwd])=~s!/.*?(/[^/]+/[^/]+)\$!...\$1!;chomp;print'"

   export PROMPT_COMMAND="perl
   -e'(\$_=qx[pwd])=~s!/.*((/[^/]+){2}).\$!...\$1!s;print'"

Hope you have a very nice day, :-)
Tim Ayers ([EMAIL PROTECTED])

Reply via email to