このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1301067486/814
#  Javaでaaaa1.txt と bbbb2_2.txtというファイル名が有り、 
#  aaaaと1、bbbb2_と2を抽出したい 
#  どう書いたらいい? 
#   

'aaaa1.txt と bbbb2_2.txtというファイル名が有り、aaaaと1、bbbb2_と2を抽出したい'(_文字列,_ファイル名,_指標) :-
        sub_atom(_文字列,_,_,_,_前文字列,_適合文字列,_後文字列,L1,L2,L3),
        'aaaa1.txt と bbbb2_2.txtというファイル名が有り、aaaaと1、bbbb2_と2を抽出したい'(L2,_ファイル名,_指標).

'aaaa1.txt と bbbb2_2.txtというファイル名が有り、aaaaと1、bbbb2_と2を抽出したい'([a,a,a,a|R],aaaa,_指標) :-
        指標を得る(R,_指標).
'aaaa1.txt と bbbb2_2.txtというファイル名が有り、aaaaと1、bbbb2_と2を抽出したい'([b,b,b,b,2,_,2|R],bbbb2_2,_指標) :-
        指標を得る(R,_指標).

指標を得る(L,_指標) :-
        append(L1,['.',t,x,t],L),
        number_chars(_指標,L1).