Alle Werte gleich deuten schon auf die Default-Funktion Hash für ein Objekt.
Vielleicht hilft dir ja diese Seite weiter:
http://search.cpan.org/dist/DBD-DB2/DB2.pod
Kannst du nicht Perl auf dem PC ausführen?
Ggf. kann man dann dort besser debuggen als im Nebel stochern.
Denn wo die DB im Endeffekt ist ist doch egal, Hauptsache sie ist erreichbar.
Welche Art von Schnittstelle verwendet wird lässt sich relativ einfach feststellen:
Bau eine "Sleep"-Funktion im Script ein während die Verbindung geöffent ist.
Auf der AS/400 kannst du dann per
WRKOBJLCK CONNECTUSER *USRPRF
den Verbindungsjob herausfinden.