Perl 原型函数

描述

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

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

句法

以下是该函数的简单语法 -

prototype EXPR

返回值

如果没有函数原型，则此函数返回 undef，否则返回包含 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 $$