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的返回值，即成功或失败