perl如何调用oracle存储进程

要使用Perl调用Oracle存储进程，可使用DBI模块连接到Oracle数据库，并使用prepare和execute方法履行存储进程。

下面是一个示例代码：

use DBI;

my $dsn = 'DBI:Oracle:host=HOSTNAME;sid=SID';
my $username = 'USERNAME';
my $password = 'PASSWORD';

# 连接到Oracle数据库
my $dbh = DBI->connect($dsn, $username, $password) or die "没法连接到数据库: $DBI::errstr";

# 定义存储进程的调用语句
my $sql = 'BEGIN your_procedure_name(:param1, :param2); END;';

# 准备履行存储进程
my $sth = $dbh->prepare($sql) or die "没法准备存储进程: $DBI::errstr";

# 绑定存储进程的参数
my $param1 = 'value1';
my $param2 = 'value2';
$sth->bind_param(':param1', $param1);
$sth->bind_param(':param2', $param2);

# 履行存储进程
$sth->execute() or die "没法履行存储进程: $DBI::errstr";

# 关闭数据库连接
$dbh->disconnect();

请根据实际情况修改示例代码中的主机名、用户名、密码、存储进程名和参数。