I'm using Inline::Java to interface with a commercial Java API. Everything is working real well. However, I've run into a couple of methods that expect a class to be passed instead of a simple object. For example I have a Java method defined like:

public java.util.List list(java.lang.Class jClass) { ... }
[download]

The list method returns a list of all objects of class jClass that are associated to the method's object (jObject).

How can I call the method from perl and specify a class as the parameter?

I know that this works:

my $jSubObject = new com::myco::jSubClass();
my $list = $jObject->list($jSubObject->getClass());
[download]

But obviously, I don't want to define a new object just to get it's class.