このディレクトリの索引

#  検索したい字句が存在してもしなくても
#  マッチさせるにはどうしたらいいのでしょうか?
#  
#  おいしい料理1料理の解説1
#  料理の解説2
#  
#  っというタグがあってこれから
#  
#  1行目では、
#   \1 → オムレツ.jpg
#   \2 → おいしい料理
#   \3 → 料理の解説1
#  2行目では
#   \1 → カツ丼.jpg
#   \2 →
#   \3 → 料理の解説2
#  
#  というようにしたいのです。
#  src="(.*?)".*?alt="(.*?)".*?(.*?)
#  ↑のような正規表現を考えたのですが
#  これを2行目にも正しくマッチできるように
#  修正していただけませんか? 

'検索したい字句が存在してもしなくてもマッチさせる'(_文字列,[Atom1,Atom2,Atom3]) :-
        atom_chars(_文字列,Chars),
        'src='(Chars,Atom1,Chars1),
        'alt='(Chars1,Atom2,Chars2),
        ''(Chars2,Atom3,Chars3).

'src='(Chars,Atom,R2) :-
        append(_,[s,r,c,=,"|R1],['"'|R2],Chars),
        concat_atom(R1,Atom),!.
'src='(Chars,'',Chars) :- !.

'alt='(Chars,Atom,R2) :-
        append(_,[a,l,t,=,"|R1],['"'|R2],Chars),
        concat_atom(R1,Atom),!.
'alt='(Chars,'',Chars) :- !.

''(Chars,Atom,R2) :-
        append(_,[<,b,>|R1],[<,/,b,>|R2],Chars),
        concat_atom(R5,Atom),!.