このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1323566370/689
#  <que name="" mail="" vpos="-45400">/publish lv80605616_t2B_SHD_7@s35841 /content/20120319/lv80605616_214226439000_1_8370f8.f4v</que> 
#  この文字列から 
#   
#  /content/20120319/lv80605616_214226439000_1_8370f8.f4v 
#  
#   
#  数字とかは毎回変わるんだけど 
# 
# 

'<que name="" mail="" vpos="-45400">/publish lv80605616_t2B_SHD_7@s35841 /content/20120319/lv80605616_214226439000_1_8370f8.f4v</que>の部分を抜き出すにはどうすればいい?数字とかは毎回変わるんだけど'(_文字列,_前文字列,_適合文字列,_後文字列) :-
        sPLIT(_文字列,[' ',''],L),
        append(L1,[' ',_適合文字列,''|R],L),
        concat_atom(L1,S1),
        concat_atom([S1,' '],_前文字列),
        concat_atom(['