Have you considered Inline::Python?

This module sets up an in-process Python interpretor, then directly examines the Python symbol table to establish Perl bindings.

From the doco:

   print "9 + 16 = ", add(9, 16), "\n";
   print "9 - 16 = ", subtract(9, 16), "\n";

   use Inline Python => <<'END_OF_PYTHON_CODE';
   def add(x,y): 
      return x + y

   def subtract(x,y):
      return x - y

   END_OF_PYTHON_CODE
[download]