Prolog-解析CSV文件

Question

我尝试解析一个csv文件并从每一行中提取特定的列数据，我设法将文件解析为记录列表，但是我无法遍历每个记录的字段。 他们是否可以使用序言来解析csv文件，以便csv文件的每个记录本身都是一个列表？

我的代码：

:- use_module(library(csv)).

% main function ,  first parse the file then extracts max total market  
get_rows_data(File,Rows) :-
   csv_read_file(File, Rows, [functor(record), arity(18)]),
   maplist(assert, Rows),
   get_row(Rows).

get_row([]).    
get_row([Head|Tail]) :-
   write('*********************************'),write(Head),
   get_row(Tail). 

Answer 1

我会说你快到了。 您只需要将记录词转换为列表。

:- use_module(library(apply)).
:- use_module(library(csv)).

get_rows_data(File, Lists):-
  csv_read_file(File, Rows, []),
  rows_to_lists(Rows, Lists).

rows_to_lists(Rows, Lists):-
  maplist(row_to_list, Rows, Lists).

row_to_list(Row, List):-
  Row =.. [row|List].