Perl 调用BTEQ
在开发一些ETL作业时,常常需要批量提交SQL,这时,我们可以使用BTEQ进行批量操作。.
注意:在使用BTEQ运行SQL前,需要登录。
使用 .HELP BTEQ; 命令,列出BTEQ命令的帮助文档。
#!/usr/bin/perl #通过管道调用BTEQ my $bteq_rc = open(BTEQ, "| bteq"); unless ($bteq_rc) { print "Could not invoke BTEQ command\n"; return -1; } print BTEQ <<ENDOFINPUT; .WIDTH 1024; .HELP BTEQ; ENDOFINPUT