mot nu trouvé où l'opérateur devrait

Je suis nouveau sur le perl, et je suis fiddiling autour. J'ai trouvé ce code en ligne.
Voici l'extrait de code:

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).

Et j'obtiens cette erreur: mot nu trouvé où l'opérateur attend près de "process_input(n, Tâche de" ligne 83.
Peut-être un emballement multi-ligne, chaîne commençant à la ligne 82.

  • êtes-vous sûr de ses Perl que vous êtes de bidouiller avec?
  • D'accord, qui ressemble plus à prolog.
  • Autant que je sache, les deux prolog et perl utiliser ".pl" comme leur extension, qui est probablement la source de la confusion.