Цикл until

Цикл until

Еще одной конструкцией цикла в языке Perl является цикл until , который являет­ся противоположностью циклу while . Как вы помните, в цикле while инструкции выполняются до тех пор, пока выполняется заданное условие. В цикле until , на­против, инструкции выполняются до тех пор, пока не будет выполнено условие. Например, рассмотрим цикл while , такой, как показан на следующей странице.

            while (!(expr))

                        {

                                    statement;

                        }

Используя цикл until , можно создать идентичный цикл, показанный ниже:

            until (expr)

            {

                        statement;

            }

Аналогичным образом следующая конструкция do while использует оператор ло­гического отрицания для того, чтобы выполнять цикл, пока заданное булево вы­ражение не станет истинным:

do

{

            statement;

} while (!(expr));

Используя конструкцию do until , вы можете сформировать идентичный цикл без использования логического отрицания:

do

{

            statement;

} until (expr);