このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/php/1168450843/743
#  http://ime.nu/から最初の空白までを抽出する正規表現はどうなりますか? 
# 
# 

'http://ime.nu/から最初の空白までを抽出する'(_文字列,_前文字列,_抽出された文字列,_後文字列) :-
        sub_atom(_文字列,_,_,_,S1,S2,_後文字列,[h,t,t,p,:,/,/,i,m,e,'.',n,u,'/'|R2],L2,[' '|_]),
        \+(member(' ',R2)),
        atom_chars(_抽出された文字列,R2),
        concat_atom([S1,'http://ime.nu/'],_前文字列).