Perl | prototype() Function

prototype() function in Perl returns a string containing the prototype of the function or reference passed to it as an argument, or undef if the function has no prototype.

Syntax: prototype(function_name)

Parameter:
function_name: Function whose prototype is to be determined

Returns:
prototype of the function passed or undef if no prototype exists

Example 1:

#!/usr/bin/perl -w 
  
$prototype_func = prototype ( "GFG" ); 
print "Prototype of GFG function ",  
            "is $prototype_func\n"; 
  
sub GFG(**)  
{ 
    print "Just a statement\n"; 
} 

Output:

Prototype of GFG function is **

Example 2:

#!/usr/bin/perl -w 
  
$prototype_func = prototype ( "GFG" ); 
print "Prototype of GFG function ",  
            "is $prototype_func\n"; 
  
sub GFG($$)  
{ 
    print "Just a statement\n"; 
} 

Output:

Prototype of GFG function is $$

My Personal Notes

Recommended Posts:

Code_Mech

Check out this Author's contributed articles.

If you like GeeksforGeeks and would like to contribute, you can also write an article using contribute.geeksforgeeks.org or mail your article to contribute@geeksforgeeks.org. See your article appearing on the GeeksforGeeks main page and help other Geeks.

Please Improve this article if you find anything incorrect by clicking on the "Improve Article" button below.