無法通過 perl 腳本從 oracle DB 獲取整個字符串

Question

在我的 perl 腳本中，我從 oracle DB.column:SQL_STATUS_INFO獲取數據類型為 LONG 的記錄。

$sql_statement = "select SQL_STATEMENT";
$sql_statement .= " from SQL_STATUS_INFO";

my $sql_return = SQL_Exec($sql_statement);
my $DbRtn_DB = SQL_Fetch();

foreach my $fromdb (@{$DbRtn_DB}) {
    printf "SQL_STATEMENT  :@{$fromdb}[0]\n";
}

SQL_Exec ， SQL_Fetch來自 perl 模塊，用於執行語句並獲取結果。

在表SQL_STATUS_INFO ，我在SQL_STATEMENT列中有以下數據。

CREATE TABLE "ECLIPSFILE_4G_DUMMY_TRNX" (ENBID VARCHAR2(30 CHAR),MCC NUMBER(38),MNC NUMBER,MNCLENGTH NUMBER,CELL_IDNUMBER(38),EARFCNDL NUMBER,PHYSICALID)

通過上面的腳本獲取它時，我無法將整個語句放入$DbRtn_DB 。

當我運行上面的腳本時，我得到的輸出是：

CREATE TABLEECLIPSFILE_4G_DUMMY_TRNX (ENBID VARCHAR2(30 CHAR),MCC NUMBER(38),MNC

所以，我無法得到整個聲明。

但我能夠將大文本插入數據庫。 我在 SQL_DEVELOPER 中嘗試了上面的 SQL 語句，它給了我整個字符串作為輸出，但不是通過 perl 腳本。

如何將整個字符串放入我的 perl 變量中。

Answer 1

直接使用DBI有同樣的錯誤嗎？ 在任何情況下，如果沒有看到SQL_Exec和SQL_Fetch的代碼，就很難調試您的問題。 您引用的結果特別長 80 個字符，這可能不是巧合。