Funnily enough, perl has both a native prolog implementation AI::Prolog (which is not amazingly fast but serviceable for simple cases) and Language::Prolog::Yas

Funnily enough, perl has both a native prolog implementation AI::Prolog (which is not amazingly fast but serviceable for simple cases) and Language::Prolog::Yaswi, which is bindings to SWI prolog with a perl-native DSL if you want it.