30分プログラム、その439。fishにあるprompt_pwd関数をPerlで再現してみる。 このprompt_pwdはわりと素敵で、/usr/local/binを/u/l/binみたいに最後のディレクトリ名以外を一文字に省略してくれる。これをscreenのステータスラインに表示するようにすると、…