Текущий архив: 2004.09.12;
Скачать: CL | DM;

Вниз

Немного Perl a   Найти похожие ветки 

← →
Uncle Archi ©   (2004-08-23 01:38) [0]

Я тут вижу PHP некоторые знают, может и с этим поможете ?
Вот кусок кода

while (1==1)
{
.........
  do
  {
    $s=<IN> || last;#!!!!!!!!!!!!!
    $s1=substr($s,0,5);
  } until ($s1 eq "&name");
..................
}
Как заставить тот самый last выходить из его цикла, а не из while ?

---

← →
TUser ©   (2004-08-23 04:41) [1]

А do в перле это вовсе и не цикл. Это просто терма с модификатором until. Следовательно - никак. Можно переработать логику программы, и убрать этот last.

---

← →
Uncle Archi ©   (2004-08-24 00:18) [2]

Это окончательно ?

---

Страницы: 1 вся ветка

Текущий архив: 2004.09.12;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.092 c