サブルーチンに必要なパラメータはどのようにありますか？

Question

Perlでは、呼び出されたときにパラメータが渡されないとスクリプトがコンパイルされないようなサブルーチンを宣言できますか？

私は事のこのタイプは、あなたが現在できる最善についてだと思います

Answer 1

：

#!/usr/local/bin/perl -w 
use strict; 
require 5.020; 
use warnings; 
use feature qw(say signatures); 
no warnings "experimental::signatures"; 

print "Enter your first name: "; 
chomp(my $name1 = <STDIN>); 

print "Enter your last name: "; 
chomp(my $name2 = <STDIN>); 

say "Calling takesOneOrTwoScalars with 2 args"; 
takesOneOrTwoScalars($name1, $name2); 

say "Calling takesOneOrTwoScalars with 1 arg"; 
takesOneOrTwoScalars($name1); 

say "Calling takesOneOrTwoScalars with 0 args"; 
takesOneOrTwoScalars(); 

sub takesOneOrTwoScalars($firstName, $lastName="") 
{ 
    print "Hello, $firstName"; 
    if ($lastName) 
    { 
     say " $lastName"; 
    } 
    else 
    { 
     say ", I see you didn't give your last name."; 
    } 
} 

Answer 2

ことのいくつかはPerlは非常に限られたをサポートし

ある程度、 prototypes (persub)で達成することができます関数のプロトタイプを使用したコンパイル時の引数チェックの種類。
...
は...この機能の目的は、主に、例えば、組み込み関数

のように動作するサブルーチンを定義できるように、sub f1(\@)とsub f2($$)として宣言された潜水艦は（f1(@ary)として呼び出すことができています配列変数、@）とf2(SCALAR, SCALAR)があるか、コンパイル時にエラーが発生しています。

しかし、それにははるかに多くの微妙な懸念があります。以下のドキュメントとリンクをお読みください。プロトタイプは、ではなく、のようにコンパイルされた言語の関数シグネチャのようなものであり、そのように見えるかもしれませんが、そのジョブを行うつもりはありません。わずかな誤用でさえ微妙なバグにつながる可能性があります。

• FMTYEWTK about Prototypes in Perl（perlmonks）を参照

• Understand why you probably don't need prototypes（EffectivePerler）

• Why are perl 5's function prototypes bad（SO）

• The problem with prototypes（現代のPerl）

• Perl subroutine prototyping the correct way to do it（SO）

適宜使用される場合、それらは有用であり得ると述べているすべて。 OPのikegamiのコメントを参照してください。