Re: Fun with xterm window titles, or Yet Another golf challenge

[Andrew . Savige]

Newton, Philip wrote:
> Oops, make that
> 
> export PROMPT_COMMAND="perl -e 
> '@d=split/\//,qx(pwd);@d=(q(...),@d[-2,-1])if@d>3;
> chomp@d;\$\"=q(/);print+qq(\e]0;@d\a)'"

How about:

export PROMPT_COMMAND="pwd|perl -pe
'chop;s#^.*(/.+/.+)\$#...\1#;\$_=qq(\e]0;\$_\a)'"

If you are at least two directories deep,
you could save some more characters with:

export PROMPT_COMMAND="pwd|perl -pe
's#^.*(/.+/.+)\n#\e]0;...\1\a#'"

Andrew.