Sorry, I don't have any experience on an AS/400. I assume you're using DB2, then? If so, you might find the IBM document Perl programming with DB2 Universal Database useful. It contains an example of calling a stored procedure. While it doesn't show how to retrieve a recordset from the stored procedure, further poking around on the IBM site may give you what you're looking for.

Another place you can look is the test code (presumably) provided with the DBD::DB2 driver. If you don't have it on hand, just download it from CPAN and expand it locally, and go into the t directory. There ought to be a test for retrieving from stored procedures. I notice that the "what changed" document mentions a couple SPROC changes, including one about retrieving multiple recordsets.

...roboticus

When your only tool is a hammer, all problems look like your thumb.