我想读取纯文本文件并将谓词应用于每一行(谓词包含write输出的内容).我该怎么办？
write
io prolog swi-prolog dcg
dcg ×1
io ×1
prolog ×1
swi-prolog ×1