サブルーチンのプロトタイプを取得する
prototype
はサブルーチン FUNCTION のプロトタイプを文字列として返します。
FUNCTION にはサブルーチンの参照または名前を指定します。
省略されたら $_ が使われます。
指定のサブルーチンにプロトタイプが指定されていなければ、prototype
は
undef
を返します。
次のサンプルコードは、サブルーチンの名前を prototype
に引き渡しています。
sub my_func : prototype($$) {
my ( $arg1, $arg2 ) = @_;
}
print prototype('my_func'), "\n"; # $$
次のサンプルコードは、prototype
にサブルーチンの参照を引き渡しています。
my $my_func = sub : prototype($$) {
my ( $arg1, $arg2 ) = @_;
};
print prototype($my_func), "\n"; # $$
プロトタイプの詳細については、 perlsub を参照してください。