如何删除所有的空格并在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).