split-string

Katsumi Yamaoka yamaoka @ jpl.org
2001年 7月 9日 (月) 17:14:20 JST


>>>>> In [apel-ja : No.00647] 
>>>>>	"OHASHI, Akira" (大橋 彰) <bg66 @ koka-in.org> wrote:

>> (delete "" (split-string "/hoge/fuga" "/"))

大橋さん> これだと (split-string "/hoge//fuga" "/") の間の "" も消えちゃ
大橋さん> います。

むむっ ^^;;、

(let ((path "/hoge//fuga"))
  (if (string-match "^/?\\(.+\\)/?$" path)
      (split-string (match-string 1 path) "/")
    (split-string path "/")))

これは文字列の最初と最後の "/" を無視させているだけですが、この
調子で発展させていくと (どちらかの) split-string の定義と同じよ
うなものになってしまうのでしょうね。:-p
-- 
Katsumi Yamaoka <yamaoka @ jpl.org>




More information about the APEL-ja mailing list