loves("Mr. Poe", perl) :-
  version(perl, Version),
  Version >= 5.8.