Perl代码说明

Question

有人可以告诉我这是什么吗

$IN_OUT = ( $inOut eq 'out' ? 'Out' : 'In' );

在做什么？我需要将其翻译为Java，但我对Perl并不了解。

Answer 1

这是执行以下操作的紧凑方式：

if ( $inOut eq 'out' )
{
 $IN_OUT = 'Out';
} else
{
 $IN_OUT = 'In';
}

如果保证$inOut仅是out或in，则只需执行以下操作即可达到相同的结果：

$IN_OUT = ucfirst $inOut;

您可以在此处找到有关Perl三元运算符的特定文章：https://perlmaven.com/the-ternary-operator-in-perl

此外，当对某些Perl结构或运算符有疑问时，可以从以下资源开始：

• https://perldoc.perl.org/perlop.html（适用于所有运算符），三元条件运算符位于https://perldoc.perl.org/perlop.html#Conditional-Operator
• https://perldoc.perl.org/index-functions.html用于所有内部功能
• https://perldoc.perl.org/perlvar.html用于所有默认的内部Perl变量（通常这会引起来自其他语言的人提出的问题）
• 如果遇到问题，Perl常见问题解答https://learn.perl.org/faq/也应该是您的第一站