Perl практика
Оператор while/until.
while(выражение) { op_1; op_2; op_3; }
until(выражение) { op_1; op_2; op_3; }
Содержание раздела