Hi, this may be a basic perl question. I'm using inline::java to execute
some public methods like this one:

        public User findUserByLogin(String loginName, boolean populate)
{
                User ret = null;
                try {
                        ret = impl.findUserByLogin(loginName, populate);
                } catch (ExecuteException e) {
                        this.trapError(1, "Error looking up user.
loginName=" + loginName
                                            + " populate =" + populate +
"\nERROR:"
                                            + e.getMessage(), e);
                }
                return ret;
        }

I call it:
$obj = $mstdAdmin->findUserByLogin('myuserid',1);

Print "$obj\n";
Inline::Java::Object=HASH(0xaae924)

I'm having a helluva time trying to dereference this

%hash = %$obj;
foreach my $k (keys %hash) {print "$k: $hash{$k}\n";}

prints nothing.

(undef,$h) = split(/\=/,$obj);
%hash = %$h;
foreach my $k (keys %hash) {print "$k: $hash{$k}\n";}

prints nothing.

Is there a trick?

Many thanks,
mike 

Reply via email to