Perl prototype 函数
描述
此函数返回一个字符串，其中包含 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 $$
