从PERL连接AS400

Question

我想使用Perl连接到AS400。 DBI模块不支持它。你能建议任何其他模块吗？我需要什么其他东西？我正在开发Linux环境。

Answer 1

过去，在没有专用驱动程序的情况下，我通过rexec和ftp等标准服务将Perl与AS400连接。

# warn: this use clean user/passwd. Use with care
$param="call pgm(someLib/someProc) parm('someUsefulParameters')";
system("rexec -a -l asUser -p asPaswd as400ipAddress \"${param}\" 2>/dev/null >myOutput.txt");
# ...then read myOutput.txt

Answer 2

我对Perl一无所知，但是如果有一个驱动程序可以通过JDBC或ODBC访问，那么你应该能够很好地连接它。