Объяснение кода 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 по умолчанию (что часто вызывает вопросы у людей из других языков)
• FAQ по Perl qt https://learn.perl.org/faq/ также должно быть вашей первой остановкойв случае проблем