perl sybase:捕获存储过程打印和选择语句

perl sybase:捕获存储过程打印和选择语句,perl,printing,sybase,procedure,Perl,Printing,Sybase,Procedure,我有一个存储过程,它有很多print语句,它同时产生print语句和resultset 如何分别使用perl和(DBI/DBD或CTLib或DBLib)捕获打印语句和选择语句 syb_err_handler(subroutine ref)此属性用于设置特殊错误处理程序回调(即perl子例程),该回调在正常错误处理程序执行其任务之前被调用。如果此子例程返回0,则忽略该错误这对于处理Transact-SQL中的打印语句、处理来自备份服务器的消息、showplan输出、dbcc输出等非常有用。[emp

我有一个存储过程,它有很多print语句,它同时产生print语句和resultset

如何分别使用perl和(DBI/DBD或CTLib或DBLib)捕获打印语句和选择语句

syb_err_handler(subroutine ref)
此属性用于设置特殊错误处理程序回调(即perl子例程),该回调在正常错误处理程序执行其任务之前被调用。如果此子例程返回0,则忽略该错误这对于处理Transact-SQL中的打印语句、处理来自备份服务器的消息、showplan输出、dbcc输出等非常有用。[emphasis mine]

并显示了以下处理方法:

$dbh = DBI->connect('dbi:Sybase:server=troll', 'sa', '', 
                { syb_err_handler => \&err_handler });

我以前做的另一件事是,知道我的proc主要是从perl调用的,就是“选择”所有打印的输出,第一列是“Message:”,第二列是我想要打印的消息。我甚至用数据库函数创建了一种printf

这只是那些名字中有“捕获”的人。这个问题很有可能展示“不止一种方法”。谢谢,这正是我想要的