Perl 原型函数

描述

此函数返回一个字符串，其中包含 EXPR 指定的函数或引用的原型，如果函数没有原型，则返回未定义。

您还可以使用此方法来检查内置函数的可用性。

语法

以下是此函数的简单语法−

prototype EXPR

返回值

如果没有任何函数原型，此函数返回未定义；否则，返回一个字符串，其中包含 EXPR 指定的函数或引用的原型。

示例

以下示例代码展示了如何进行基本使用−

#!/usr/bin/perl -w

$func_prototype = prototype ( "myprint" );
print "myprint prototype is $func_prototype\n";

sub myprint($$) {
   print "This is test\n";
}

执行以上代码后，会产生以下结果−

myprint prototype is $$