如何删除所有空格并在prolog文件中发送？

Question

我想读取一个文件并删除所有空格并发送（nl）这些并将所有内容放入列表中。

例如： 来自

myfile.txt = (First Line (Second ( line ) and Third and other)
To List = [FirstLine(Second(line)andthirdandother)]

如何实现？

感谢

Answer 1

如果您的Prolog具有适当的内置结构，例如read_file_to_codes / 3和code_type / 2，则可以这样做

file_to_list(File, List) :-
  read_file_to_codes(File, Codes, []),
  exclude(bad_char, Codes, List).

bad_char(C) :-
  code_type(C, space).