使用 perl 准备命令不与 DBI 一起使用

prepare command not working with DBI using perl

$sth = $dbh->prepare("select  CODE_ID,NAME_CODE,SUM(INR_COL + OUT_COL) AS "TOTAL SUM" from nwsa where CODE_ID='L01A' OR CODE_ID='L01B'OR CODE_ID='L01C' OR CODE_ID='L01D' OR CODE_ID='L01DA' OR CODE_ID='L01E' OR CODE_ID='L02A' OR CODE_ID='L02B' OR CODE_ID='L02C' OR CODE_ID='L02E' OR CODE_ID='L02N'  group by  CODE_ID,NAME_CODE  ");  # your query here
$sth->execute( );
$out = DBIx::Dump->new('format' => csv,   # excel or csv
                       'output' => $FILENAME, # file to save as
                       'sth'    => $sth);

在 "TOTAL SUM" 附近发现裸词时出现错误 .. 错误是什么..?

转义引号:

$sth = $dbh->prepare("select  CODE_ID,NAME_CODE,SUM(INR_COL + OUT_COL) AS \"TOTAL SUM\" ........

或使用单引号:

$sth = $dbh->prepare('select  CODE_ID,NAME_CODE,SUM(INR_COL + OUT_COL) AS "TOTAL SUM" ........');