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();

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