perl調用存儲過程
Ⅰ perl 調用 存儲過程 怎麼查看執行結果
perl裡面系統調用有兩種方式:
1.system("my_program.exe");
2.`my_program.exe`
這兩種方式都可以執行my_program.exe.
但是這兩種調用是有區別的。
使用system進行系統調用,會得到程序my_program.exe的返回值,即成功或失敗
Ⅱ PHP調用存儲過程的結果集如何非同步展示在前端表格中
本文闡述了怎麼使用DBMS存儲過程。我闡述了使用存儲過程的基本的和高級特性,比如返回ResultSet。本文假設你對DBMS和JDBC已經非常熟悉,也假設你能夠毫無障礙地閱讀其它語言寫成的代碼(即不是Java的語言),但是,並不要求你有任何存儲過程的編程經歷。
存儲過程是指保存在資料庫並在資料庫端執行的程序。你可以使用特殊的語法在Java類中調用存儲過程。在調用時,存儲過程的名稱及指定的參數通過JDBC連接發送給DBMS,執行存儲過程並通過連接(如果有)返回結果。
使用存儲過程擁有和使用基於EJB或CORBA這樣的應用伺服器一樣的好處。區別是存儲過程可以從很多流行的DBMS中免費使用,而應用伺服器大都非常昂貴。這並不只是許可證費用的問題。使用應用伺服器所需要花費的管理、編寫代碼的費用,以及客戶程序所增加的復雜性,都可以通過DBMS中的存儲過程所整個地替代。
你可以使用Java,Python,Perl或C編寫存儲過程,但是通常使用你的DBMS所指定的特定語言。Oracle使用PL/sql,PostgreSQL使用pl/pgsql,DB2使用Proceral SQL。這些語言都非常相似。在它們之間移植存儲過程並不比在Sun的EJB規范不同實現版本之間移植Session Bean困難。並且,存儲過程是為嵌入SQL所設計,這使得它們比Java或C等語言更加友好地方式表達資料庫的機制。
因為存儲過程運行在DBMS自身,這可以幫助減少應用程序中的等待時間。不是在Java代碼中執行4個或5個SQL語句,而只需要在伺服器端執行1個存儲過程。網路上的數據往返次數的減少可以戲劇性地優化性能。
使用存儲過程
簡單的老的JDBC通過CallableStatement類支持存儲過程的調用。該類實際上是PreparedStatement的一個子類。假設我們有一個poets資料庫。資料庫中有一個設置詩人逝世年齡的存儲過程。下面是對老酒鬼Dylan Thomas(old soak Dylan Thomas,不指定是否有關典故、文化,請批評指正。譯注)進行調用的詳細代碼:
try{
int age = 39;
String poetName = "dylan thomas";
CallableStatement proc = connection.prepareCall("{ call set_death_age(?, ?) }");
proc.setString(1, poetName);
proc.setInt(2, age);
cs.execute();
}catch (SQLException e){ // ....}
傳給prepareCall方法的字串是存儲過程調用的書寫規范。它指定了存儲過程的名稱,?代表了你需要指定的參數。
和JDBC集成是存儲過程的一個很大的便利:為了從應用中調用存儲過程,不需要存根(stub)類或者配置文件,除了你的DBMS的JDBC驅動程序外什麼也不需要。
當這段代碼執行時,資料庫的存儲過程就被調用。我們沒有去獲取結果,因為該存儲過程並不返回結果。執行成功或失敗將通過例外得知。失敗可能意味著調用存儲過程時的失敗(比如提供的一個參數的類型不正確),或者一個應用程序的失敗(比如拋出一個例外指示在poets資料庫中並不存在「Dylan Thomas」)
結合SQL操作與存儲過程
映射Java對象到SQL表中的行相當簡單,但是通常需要執行幾個SQL語句;可能是一個SELECT查找ID,然後一個INSERT插入指定ID的數據。在高度規格化(符合更高的範式,譯注)的資料庫模式中,可能需要多個表的更新,因此需要更多的語句。Java代碼會很快地膨脹,每一個語句的網路開銷也迅速增加。
將這些SQL語句轉移到一個存儲過程中將大大簡化代碼,僅涉及一次網路調用。所有關聯的SQL操作都可以在資料庫內部發生。並且,存儲過程語言,例如PL/SQL,允許使用SQL語法,這比Java代碼更加自然。下面是我們早期的存儲過程,使用Oracle的PL/SQL語言編寫:
create procere set_death_age(poet VARCHAR2, poet_age NUMBER)
poet_id NUMBER;
begin SELECT id INTO poet_id FROM poets WHERE name = poet;
INSERT INTO deaths (mort_id, age) VALUES (poet_id, poet_age);
end set_death_age;
很獨特?不。我打賭你一定期待看到一個poets表上的UPDATE。這也暗示了使用存儲過程實現是多麼容易的一件事情。set_death_age幾乎可以肯定是一個很爛的實現。我們應該在poets表中添加一列來存儲逝世年齡。Java代碼中並不關心資料庫模式是怎麼實現的,因為它僅調用存儲過程。我們以後可以改變資料庫模式以提高性能,但是我們不必修改我們代碼。
下面是調用上面存儲過程的Java代碼:
public static void setDeathAge(Poet dyingBard, int age) throws SQLException{
Connection con = null;
CallableStatement proc = null;
try {
con = connectionPool.getConnection();
proc = con.prepareCall("{ call set_death_age(?, ?) }");
proc.setString(1, dyingBard.getName());
proc.setInt(2, age);
proc.execute();
}
finally {
try { proc.close(); }
catch (SQLException e) {}
con.close();
}
Ⅲ perl 中子進程調用exec或者system的問題
perl中system/exec的許可權跟執行perl腳本的用戶許可權是一樣的,你能在/cgi-bin/test/下面touch文件,腳本就能去那下面寫文件。
Ⅳ perl如何調用其他文件中定義的變數 例如,有個文件cfg.pl中定義了$tabname='a',
使用::符號,就是perl未公開的全局變數
比如你定義
$LB::ver
那麼這個變數可以在
use strict; 方式下不會出錯,並且,如果主程序中存在
你的子程序或者模塊中都可以使用這個全局變數!
Ⅳ perl的DBI怎麼調用oracle存儲過程
1. 採用DBI
需要安裝 DBD-ORALCE才行,安裝步驟比較復雜
2. 採用sqlplus 執行命令
將執行語句,放到一個sql腳本文件中,如 execsql.sql.
將sql語句寫入文件
my $SqlCMD = "************";
` echo $SqlCMD >"$sqlfile"`;
`echo exit; >>$sqlfile`;
執行命令:
`sqlplus $usr/$passwd\@$oracle_sid @"$sqlfile"`;
Ⅵ Perl程序如何調用C代碼
方法1:
編譯外部C程序位obj文件
gcc -c out.c
, 修改LDDLFLAG為"-shared /abs/dir/to/out.o"
use Inline C => Config => LDDLFLAGS => "-shared /abs/dir/to/out.o";
use Inline C => <<"C_CODE";
extern int used_func(int, int);
int myfunc(int a, int b)
{
return a + b + a + used_func(a, b);
}
C_CODE
print myfunc(5, 9)."\n";
這種方法嚴重同 外部cc編譯器有關. 路徑都使用絕對路徑
方法2:
先把外部的C程序編譯成靜態鏈接庫 比如命名為 libabc.a 然後設置Inline::C的LIBS
ar -rc libout.a out.o
這種方法通用一些.
use Inline C => Config => LIBS => "-L/abs/dir/to/libout.a -lout";
下面的代碼一樣, 路徑都使用絕對路徑
其他方法就是使用perlxs, swig等工具了.
Ⅶ perl中函數調用的問題
sub myfunc {
my ($start, $end) = @_;
my $sum = 0;
$sum+= $_ for $start .. ($end+1);
return $sum;
}
print myfunc 1, 10;
Ⅷ Perl 如何處理 返回多個游標的DB2存儲過程
一個游標(cursor)可以被看作指向結果集(a set of rows)中一行的指針(pointer)。游標每個時間點只能指向一行,但是可以根據需要指向結果集中其他的行。
例如:SELECT * FROM employees WHERE sex='M'會返回所有性別為男的雇員,在初始的時候,游標被放置在結果集中第一行的前面。使游標指向第一行,要執行FETCH。當游標指向結果集中一行的時候,可以對這行數據進行加工處理,要想得到下一行數據,要繼續執行FETCH。FETCH操作可以重復執行,直到完成結果集中的所有行
在存儲過程中使用游標,有如下幾個步驟:
聲明游標、打開游標、根據需要一次一行,講游標指向的數據取到本地變數(local variables)中、結束時關閉游標
聲明游標:
>>-DECLARE--cursor-name--CURSOR----+------------+--------->
'-WITH HOLD--'
>-----+--------------------------------+--------------------->
| .-TO CALLER--. |
'-WITH RETURN--+------------+--'
'-TO CLIENT--'
>----FOR--+-select-statement-+----------------------------><
'-statement-name---'
WITH RETURN子句用於將游標所定義的結果集傳遞給另一個存儲過程或者應用(an application)
如果select語句中包含CURRENT DATE, CURRENT TIME和CURRENT TIMESTAMP,所有的FETCH語句都會返回相同的日期、時間、時間戳值,因為這些特定寄存器是在打開游標(OPEN CURSOR)的時候進行檢查的
Ⅸ perl 調用 存儲過程 怎麼查看執行結果
perl裡面系統調用有兩種方式: 1.system("my_program.exe"); 2.`my_program.exe` 這兩種方式都可以執行my_program.exe. 但是這兩種調用是有區別的。 使用system進行系統調用,會得到程序my_program.exe的返回值,即成功或失敗