PL Perl · 20 вопросов · ~55 мин · ⏱ Таймер 55:00 · Лёгкий ·

Условия и циклы

Проверяет базовое понимание темы «Условия и циклы»: чтение фрагментов, выбор корректной конструкции и объяснение результата без опоры на угадывание. В тесте 20 вопросов: код нужно не только читать, но и трассировать, проверять на отказ, сопоставлять несколько правдоподобных решений. Ровно 12 заданий содержат фрагменты Perl; остальные проверяют выбор подхода в реальной ситуации. Если в условии не сказано иначе, предполагаются современный Perl 5.40+, strict и warnings; внешние модули рассматриваются в указанном контексте.

Отвечено: 0 из 20

⏱ --:--

💡 Инструкция: Выберите один ответ из пяти. На 20 вопросов отведено 55 минут. В каждом вопросе верен только один вариант. После завершения откроются общий результат, оценки по 4 тематическим шкалам и подробный разбор.

Вопрос 1 из 20

Какое описание не теряет важный побочный эффект участка с `$x`?

my $x = 0;
if (defined $x && $x >= 0) { say 'ok' }

Ветка выполняется: defined отделяет допустимый ноль от отсутствующего ключи. Ветка выполняется: exists отделяет допустимый ноль от отсутствующего значения. Ветка выполняется: undef отделяет допустимый ноль от отсутствующего значения. Ветка выполняется: defined отделяет допустимый ноль от отсутствующего значения. Ветка не выполняется: defined отделяет допустимый ноль от отсутствующего значения.

Вопрос 2 из 20

Как точнее всего описать действие фрагмента с `$n`?

my $n = 3;
while ($n--) { say $n }

Цикл напечатает 2, 1, 0: постдекремент возвращает старое значение для проверки, затем уменьшает переменную. Цикл напечатает 3, 1, 0: постдекремент возвращает старое значение для проверки, затем уменьшает переменную. Цикл напечатает 2, 2, 0: постдекремент возвращает старое значение для проверки, затем уменьшает переменную. Цикл напечатает 2, 1, 0: постдекремент возвращает старое ключ для проверки, затем уменьшает переменную. Цикл напечатает 2, 1, 1: постдекремент возвращает старое значение для проверки, затем уменьшает переменную.

Вопрос 3 из 20

Как ведёт себя участок «Циклы for и foreach» при выполнении?

my @x = (1,2,3);
for (@x) { $_ *= 2 }
say join ',', @x;

Foreach связывает $_ с элементами массива как псевдоним, поэтому исходный хеш станет 2,4,6. Foreach связывает $_ с элементами массива как псевдоним, поэтому исходный массив станет 2,4,6. Foreach связывает $_ с элементами массива как псевдоним, поэтому исходный массив станет 2,5,6. Foreach связывает $_ с элементами массива как псевдоним, поэтому изменённый массив станет 2,4,6. Foreach связывает $_ с элементами массива как псевдоним, поэтому исходный массив станет 3,4,6.

Вопрос 4 из 20

Что в этом примере с `$x`, `@rows` и `$y` происходит на самом деле?

OUTER: for my $x (@rows) {
  for my $y (@$x) { next OUTER if $y < 0 }
  say 'valid';
}

Дополнительное изменение не требуется, поскольку код уже обеспечивает следующее: Явная метка или предварительная проверка делает уровень управления потоком однозначным. В показанном случае решающим становится только ограничение: redo повторяет текущую итерацию без повторной проверки условия и без перехода к следующему элементу. В показанном коде «Управление потоком» проявляется другой эффект: обычный last завершает только внутренний цикл, поэтому строка всё равно помечается valid. Этот код приведёт к иному эффекту: Обычный last завершает только внутренний цикл, поэтому строка всё равно помечается valid. Метка заставляет next перейти к следующей строке внешнего цикла при первом отрицательном элементе.

Вопрос 5 из 20

Какой отказ объясняется показанным кодом, а не внешней системой?

my $name = '0';
unless ($name) { say 'missing' }

Нежелательное поведение вводит предлагаемое решение: Явная проверка определённости и пустой строки не смешивает значение '0' с отсутствием. Строка '0' ложна в Perl, поэтому unless ошибочно считает допустимое имя отсутствующим. Дефект следует искать в другой оговорке: Строка '0' — особое ложное строковое значение Perl, что важно при проверке пользовательского ввода. Строка '1' ложна в Perl, поэтому unless ошибочно считает допустимое имя отсутствующим. Основная проблема здесь — сам результат штатного случая: Ветка выполняется: defined отделяет допустимый ноль от отсутствующего значения.

Вопрос 6 из 20

Какое скрытое допущение ломает контракт примера «Циклы while и until»?

my $line;
while ($line = next_record($fh)) { push @rows, $line }

Проблема возникает в исправленном варианте: defined отличает признак конца пользовательского итератора от ложного содержимого записи. Причина сбоя совпадает с обычным результатом примера: Цикл напечатает 2, 1, 0: постдекремент возвращает старое значение для проверки, затем уменьшает переменную. Обычное присваивание в условии не проверяет истинность результата, поэтому допустимая запись '0' преждевременно завершит цикл. Обычное присваивание в условии проверяет истинность результата, поэтому допустимая запись '1' преждевременно завершит цикл. Обычное присваивание в условии проверяет истинность результата, поэтому допустимая запись '0' преждевременно завершит цикл.

Вопрос 7 из 20

Что в этом коде нарушает ожидаемое поведение?

for my $v (@x) { $v = 0 }

Лексическая переменная цикла также является псевдонимом элемента, поэтому код обнуляет массив, а не только ссылку. Лексическая переменная цикла также является псевдонимом элемента, поэтому код обнуляет массив, а не только копию. Основная проблема здесь — сам результат штатного случая: foreach связывает $_ с элементами массива как псевдоним, поэтому исходный массив станет 2,4,6. Лексическая переменная цикла также является псевдонимом элемента, поэтому код обнуляет хеш, а не только копию. Лексическая переменная цикла также не является псевдонимом элемента, поэтому код обнуляет массив, а не только копию.

Вопрос 8 из 20

Какую границу автор фрагмента «Управление потоком» не учёл?

for my $x (@rows) {
  for my $y (@$x) { last if $y < 0 }
  say 'valid';
}

Источником дефекта становится само изменение: Явная метка или предварительная проверка делает уровень управления потоком однозначным. Дефект следует искать в другой оговорке: redo повторяет текущую итерацию без повторной проверки условия и без перехода к следующему элементу. Обычный last завершает только внутренний цикл, поэтому строка всё равно помечается valid. Показанный код уже соблюдает правило «Метки оправданы, когда нужно выйти или продолжить конкретный вложенный цикл; без них break-подобные операторы действуют на ближайший цикл», поэтому отдельного дефекта нет. Риск возникает уже в обычном результате: Метка заставляет next перейти к следующей строке внешнего цикла при первом отрицательном элементе.

Вопрос 9 из 20

Какую гарантию добавляет правка «Условия if и unless» с `$name`?

if (!defined $name || $name eq '') { die 'missing' }

Явная проверка определённости и пустой строки не смешивает значение '0' с отсутствием. Явная проверка определённости и пустой строки не смешивает значение '1' с отсутствием. Явная проверка определённости и пустой строки не смешивает ключ '0' с отсутствием. Правка лишь воспроизводит исходное поведение: Ветка выполняется: defined отделяет допустимый ноль от отсутствующего значения. Явная проверка определённости и непустой строки не смешивает значение '0' с отсутствием.

Вопрос 10 из 20

Почему новая версия с `$line`, `$fh` и `@rows` устраняет исходный дефект?

while (defined(my $line = next_record($fh))) { push @rows, $line }

Правка лишь воспроизводит исходное поведение: Цикл напечатает 2, 1, 0: постдекремент возвращает старое значение для проверки, затем уменьшает переменную. Defined отличает признак конца пользовательского итератора от ложного содержимого записи. Exists отличает признак конца пользовательского итератора от ложного содержимого записи. Undef отличает признак конца пользовательского итератора от ложного содержимого записи. После изменения сохраняется прежний дефект: Обычное присваивание в условии проверяет истинность результата, поэтому допустимая запись '0' преждевременно завершит цикл.

Вопрос 11 из 20

Как исправленный код с `$v`, `@x` и `$copy` сохраняет исходное назначение?

for my $v (@x) { my $copy = $v; $copy = transform($copy) }

Чтобы не менять массив, не нужно работать с отдельной копией либо строить новый список через map. Правка лишь воспроизводит исходное поведение: foreach связывает $_ с элементами массива как псевдоним, поэтому исходный массив станет 2,4,6. Чтобы не менять массив, нужно работать с отдельной копией либо строить новый список через map. Чтобы не менять хеш, нужно работать с отдельной копией либо строить новый список через map. После изменения сохраняется прежний дефект: Лексическая переменная цикла также является псевдонимом элемента, поэтому код обнуляет массив, а не только копию.

Вопрос 12 из 20

Почему пограничный случай больше не теряется в участке с `$x`, `@rows` и `$_`?

ROW: for my $x (@rows) {
  next ROW if grep { $_ < 0 } @$x;
  say 'valid';
}

После изменения сохраняется прежний дефект: Обычный last завершает только внутренний цикл, поэтому строка всё равно помечается valid. Явная метка или предварительная проверка делает уровень управления потоком однозначным. Правка лишь воспроизводит исходное поведение: Метка заставляет next перейти к следующей строке внешнего цикла при первом отрицательном элементе. Изменение формы записи само по себе обеспечивает правило «Метки оправданы, когда нужно выйти или продолжить конкретный вложенный цикл; без них break-подобные операторы действуют на ближайший цикл». Исправленный вариант можно считать надёжным, поскольку больше не действует ограничение: redo повторяет текущую итерацию без повторной проверки условия и без перехода к следующему элементу.

Вопрос 13 из 20

Какое положение темы «Условия if и unless» помогает выбрать надёжную реализацию?

Один приём полностью закрывает тему: Явная проверка определённости и пустой строки не смешивает значение '0' с отсутствием. Правило «if и unless удобны только пока условие остаётся коротким; сложное отрицание лучше переписать в положительной форме» гарантирует, что ограничение «Строка '0' — особое ложное строковое значение Perl, что важно при проверке пользовательского ввода» больше не проявится. Общее правило темы «Условия if и unless» сводится к частному результату: Ветка выполняется: defined отделяет допустимый ноль от отсутствующего значения. If и unless удобны только пока условие остаётся коротким; сложное отрицание лучше переписать в положительной форме. Для ревью достаточно исключить частный дефект: Строка '0' ложна в Perl, поэтому unless ошибочно считает допустимое имя отсутствующим.

Вопрос 14 из 20

Что является главным ориентиром при работе с «Циклы while и until»?

Общее правило темы «Циклы while и until» сводится к частному результату: Цикл напечатает 2, 1, 0: постдекремент возвращает старое значение для проверки, затем уменьшает переменную. Цикл чтения не должен проверять признак конца потока, а не истинность прочитанного текста. Цикл чтения должен проверять признак конца потока, а не истинность прочитанного текста. Для всех случаев темы подходит одно изменение: defined отличает признак конца пользовательского итератора от ложного содержимого записи. Для ревью достаточно исключить частный дефект: Обычное присваивание в условии проверяет истинность результата, поэтому допустимая запись '0' преждевременно завершит цикл.

Вопрос 15 из 20

Какой вывод стоит перенести из учебного примера «Циклы for и foreach» в рабочий код?

Переменная foreach по массиву обычно не является псевдонимом, поэтому присваивание ей меняет источник. Один приём полностью закрывает тему: Чтобы не менять массив, нужно работать с отдельной копией либо строить новый список через map. Переменная foreach по массиву обычно является псевдонимом, поэтому присваивание ей меняет источник. Общее правило темы можно свести к предотвращению одного сбоя: Лексическая переменная цикла также является псевдонимом элемента, поэтому код обнуляет массив, а не только копию. Общее правило темы «Циклы for и foreach» сводится к частному результату: foreach связывает $_ с элементами массива как псевдоним, поэтому исходный массив станет 2,4,6.

Вопрос 16 из 20

Какой вывод объединяет результат, дефект и исправление в теме «Управление потоком»?

Общее правило темы «Управление потоком» сводится к частному результату: Метка заставляет next перейти к следующей строке внешнего цикла при первом отрицательном элементе. Метки оправданы, когда нужно выйти или продолжить конкретный вложенный цикл; без них break-подобные операторы действуют на ближайший цикл. Общее правило исчерпывается единственной правкой: Явная метка или предварительная проверка делает уровень управления потоком однозначным. Всю тему можно представить как защиту от одного отказа: Обычный last завершает только внутренний цикл, поэтому строка всё равно помечается valid. Метки оправданы, когда не нужно выйти или продолжить конкретный вложенный цикл; без них break-подобные операторы действуют на ближайший цикл.

Вопрос 17 из 20

Что остаётся верным о теме «Условия if и unless», если учитывать контекст, отказ и побочный эффект?

Строка '0' — особое ложное строковое ключ Perl, что важно при проверке пользовательского ввода. Строка '0' — особое ложное числовое значение Perl, что важно при проверке пользовательского ввода. Строка '1' — особое ложное строковое значение Perl, что важно при проверке пользовательского ввода. Строка '0' — особое ложное строковое значение Perl, что важно при проверке пользовательского ввода. Строка '0' — особое истинное строковое значение Perl, что важно при проверке пользовательского ввода.

Вопрос 18 из 20

Какое предостережение по теме «Циклы while и until» нельзя заменить включением strict и warnings?

В актуальной версии Perl эта граница больше не действует. Until не выполняется, пока условие ложно; перенос тела из while с механическим отрицанием легко меняет момент проверки. Базовое правило «Цикл чтения должен проверять признак конца потока, а не истинность прочитанного текста» автоматически снимает указанную границу. Ограничение «until выполняется, пока условие ложно; перенос тела из while с механическим отрицанием легко меняет момент проверки» исчезает, если обычный пример один раз завершился успешно. Until выполняется, пока условие ложно; перенос тела из while с механическим отрицанием легко меняет момент проверки.

Вопрос 19 из 20

Какое ограничение блока «Циклы for и foreach» следует проверять отдельным примером?

В актуальной версии Perl эта граница больше не действует. Цикл по keys %hash получает копии ключей, а цикл по values %hash может менять значения через псевдонимы. Базовое правило «Переменная foreach по массиву обычно является псевдонимом, поэтому присваивание ей меняет источник» автоматически снимает указанную границу. Ограничение «Цикл по keys %hash получает копии ключей, а цикл по values %hash может менять значения через псевдонимы» исчезает, если обычный пример один раз завершился успешно. Цикл по keys %hash получает копии ключей, а цикл по values %hash не может менять значения через псевдонимы.

Вопрос 20 из 20

Какое различие в механизме «Управление потоком» чаще всего теряют при обобщении?

Базовое правило «Метки оправданы, когда нужно выйти или продолжить конкретный вложенный цикл; без них break-подобные операторы действуют на ближайший цикл» автоматически снимает указанную границу. Современный Perl устраняет указанное ограничение, поэтому отдельный тест избыточен. Ограничение «redo повторяет текущую итерацию без повторной проверки условия и без перехода к следующему элементу» исчезает, если обычный пример один раз завершился успешно. Redo повторяет текущую итерацию без повторной проверки условия и без перехода к следующему элементу. Режимы strict и warnings полностью снимают это ограничение.

Ответьте на все 20 вопросов, чтобы получить результат

🔗 Встроить тест на свой сайт (iframe) ▼

Скопируйте код и вставьте в любое место на вашем сайте:

Также доступна прямая ссылка на embed-страницу