Função de protótipo Perl

Descrição

Esta função retorna uma string contendo o protótipo da função ou referência especificada por EXPR, ou undef se a função não possui protótipo.

Você também pode usar isso para verificar a disponibilidade de funções integradas.

Sintaxe

A seguir está a sintaxe simples para esta função -

prototype EXPR

Valor de retorno

Esta função retorna undef se nenhum protótipo de função, senão, retorna uma string contendo o protótipo da função ou referência especificada por EXPR.

Exemplo

A seguir está o código de exemplo que mostra seu uso básico -

#!/usr/bin/perl -w

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

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

Quando o código acima é executado, ele produz o seguinte resultado -

myprint prototype is $$