このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1325685876/177
#  [1] 授業単元:C++  
#  [2] 問題文(含コード&リンク):  
#  以下のxmlファイルからSysDataの格納パスを取得する  
#   
#  <?xml version="1.0" encoding="utf-8"?>  
#  <Data>  
#  <Items>  
#  <Key>SysConf</Key>  
#  <Value>D:\tmp\conf</Value>  
#  </Item>  
#  <Items>  
#  <Key>SysEtc</Key>  
#  <Value>D:\tmp\etc</Value>  
#  </Item>  
#  <Items>  
#  <Key>SysData</Key>  
#  <Value>D:\tmp\data</Value>  
#  </Item>  
#   
#  </Data>  
#   

'以下のxmlファイルからSysDataの格納パスを取得する'(_ファイル,_格納パス) :-
        get_lines(_ファイル,Lines),
        append(_,['','SysData',Line,''|_],Lines),
        sub_atom(Line,_,_,_,S1,S2,S3,L1,[<,'V',a,l,u,e,>|R1],[<,/,'V',a,l,u,e,>,|_]),
        concat_atom(R1,_格納パス),!.