このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1301067486/168
#  よろしくお願いします 
#   
#  ●正規表現の使用環境 
#  PHP 
#   
#  ●検索か置換か? 
#  置換 
#   
#  ●説明 
#  いくつか連続した\nを、すべて<br />に置換 
#   
#  ●対象データ 
#  \n 
#  \n\n\n 
#  (連続数は1〜n) 
#   
#  ●希望する結果 
#  <br /> 
#  <br /><br /><br /> 
#   
# 
# 

'いくつか連続した改行を、すべてhtmlの改行指定に変換'(_文字列,_変換された文字列) :-
        atom_codes(_文字列,Code1),
        コードならびの改行をすべてhtmlの改行指定に変換(Code1,Code2),
        atom_codes(_変換された文字列,Code2).

コードならびの改行をすべてhtmlの改行指定に変換([],[]).
コードならびの改行をすべてhtmlの改行指定に変換([10|R1],[60,47,98,114,62|R2]) :-
        コードならびの改行をすべてhtmlの改行指定に変換(R1,R2),!.
コードならびの改行をすべてhtmlの改行指定に変換([Code|R1],[Code|R2]) :-
        コードならびの改行をすべてhtmlの改行指定に変換(R1,R2).