perl - Perl 3 条件のワンライナー

Question

私はこれを持っています

if($x<10){                                  
    print "child";
}elseif($x>10 && $x<18){
    print "teenage"
}else{
    print "old"
}

perlのワンライナーを入れたいのですが、どうすればいいですか助けてください

Answer 1

なぜあなたがしたいのか分かりませんが、これはうまくいくはずです:

print (($x<10)?("child"):(($x>10 && $x<18)?("teenage"):("old")))

しかし、短いからといって、元のバージョンよりも優れているというわけではありません。2 つのオプションのサポート/デバッグの難しさを比較してください。

をいじっているだけなら、適切な配列で文字列を定義し、 の値を計算して$x有効な配列エントリを取得することもできます。