ARGVに基づく変数の選択

Question

bashスクリプトの入力ARGV値が（yes）または（no）のいずれかです。 数値（1）または（0）と等しいには（yes）または（no）が必要で、その数値にはそのARGV値に基づいて出力 が必要です。

私の試みは、動作するように、このような何かを得ている：script.plはい印刷の&

my $VAR1=   $ARGV[0]; 
my $yes=1; 
my $no=0; 
print $VAR1; 

出力がある：1（ない単語はい）

申し訳ありませんが、私の例では、理由は明らかに愚かなようです$ VAR1は明らかに私がARG値として使ったものです。だから、私がやってみたいのは、ARGVを使ってプリセット値のリストと照合し、そのプリセットの値を出力することです。

ありがとう、

**私はperl noobです。私がこれを正しく説明していないなら、私の謝罪。

Answer 1

したがって、ある値を別の値に基づいて検索したいとします。そのためには、通常、ハッシュを使用するツールがあります。

my %yes_no_to_bool = (
    yes => 1, 
    no => 0, 
); 

@ARGV == 1 
    or die("usage\n"); 

my ($arg) = @ARGV; 

exists($yes_no_to_bool{$arg}) 
    or die("usage\n"); 

my $bool = $yes_no_to_bool{$arg};