Я новичок в Perl, и я играю вокруг. Я нашел этот код в Интернете.
Вот фрагмент кода:
82 process_input(q,[]).
83 process_input(n,Task) :- toptask(Task), set_new_threshold.
84 process_input(s,Task) :- suggest_task(T),
85 apply(addtoagenda,T),toptask(Task).
86 process_input(x,Task) :- print('not yet implemented'),nl,toptask(Task).
87 process_input(i,Task) :- user_task,toptask(Task).
И я получаю эту ошибку: Bareword найден там, где ожидается оператор рядом со строкой 83 «process_input (n, Task»)
Это может быть бегущая многострочная строка, начинающаяся со строки 82.