Как работает elsif в Perl?

Нет, что-либо в elsif имеет шанс быть выполненным только в том случае, если ни одно из предыдущих условий if/elsif не было истинным, это "else" его часть.

Если вы хотите, чтобы оценивались оба, просто сделайте if вместо elsif.

elsif ($idcount > 1 && somevariable = 0)

Должно быть:

elsif ($idcount > 1 && $somevariable == 0)

Оператор присваивания возвращает присвоенное значение, 0, что соответствует ложному, поэтому логическое и '&&' всегда терпит неудачу.

Вот как книга лам отвечает на вопрос elsif vs elseif:

— Потому что так сказал Ларри.

В любой конструкции if-elsif-else вы всегда выполняете только первую ветвь, условие которой истинно. Как только эта ветвь выполняется, программа запускается после всего if-elsif-else.

Если вы хотите сделать что-то с возможными несколькими ответвлениями, вы можете создать свой собственный синтаксис, похожий на регистр, с несколькими блоками if. Существует конструкция given-when из Perl 5.10, но она перешла в экспериментальный статус и может быть удалена из языка.

Что касается написания elsif, здесь есть несколько факторов.

На Си ты пишешь

if( ... ) {
   ... }
else if ( ... ) {

Иногда это вызывает проблему «зависания». Если вы начали, но не закончили вставлять if-else if прямо перед другим, но отличным, if, вы объединили их через оборванное else. Ларри Уоллу это не понравилось, поэтому он объединил «иначе, если» в одно слово «иначе, если». исправил это, удалив букву «e», чтобы получилось просто «elsif».

Я не понимаю, какое у вас замешательство связано с тем фактом, что Perl использует «elsif», а не «else if» или «elseif». На каждом языке, который я когда-либо использовал, от FORTRAN в стиле до 1970-х годов до Java и включая попутно такие «изюминки», как Easytreive, если вы делаете «if cond ... else ...», то материал после else не не будет выполнен, если исходное "условие" истинно. Вот что значит "еще".

В вашем случае "cond" равен "($idcount==5)", что вы уже заявили, верно, а другая часть, которая не выполняется, потому что это правда, - это "if ($idcount > 1 && $somevariable == 0)...".

В Perl есть elsif, потому что Perl не допускает "else if" в стиле C без скобок. Вместо этого вам нужно будет иметь что-то вроде:

if (x) {

}
else {
  if(y) {

  }
}

«elsif» в Perl работает точно так же, как «elseif», «else if» и «elif» в других языках. Это просто вопрос правописания.

Вот эквивалент того, что было опубликовано в вопросе.

use strict;
use warnings;

$somevariable = 0;
if ($idcount==5) 
{
  # do something
  if ( 1 )
  {
    $somevariable = 1;
  }
}
else
{
  if ($idcount > 1 && somevariable == 0) # this line was wrong in the question
  {
    # do something else here
  }
}

or

use Modern::Perl;

$somevariable = 0;
given($idcount){
  when( 5 ){
    # do something
    if ( 1 ){
      $somevariable = 1;
    }
  }
  when( $_ > 1 && $somevariable == 0 ){
    # do something else here
  }
}

use Modern::Perl; совпадает с use strict; use warnings; use 5.010;

Если вы собираетесь использовать if...elsif на любом языке, ваши условия должны быть взаимоисключающими. Два условия в вашем примере могут выполняться одновременно, поэтому вы должны разбить его на два отдельных оператора if.