Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Скриптовые языки программирования > Perl
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.06.2015, 18:44   #1
Alex irk
Новичок
Джуниор
 
Регистрация: 31.05.2015
Сообщений: 1
По умолчанию Perl: Помогите сделать бесконечный цикл но чтобы из него можно было выйти

Помогите седлать бесконечный цикл но чтобы из него можно было выйти
Код:
print "введите любые числа:\n";
my $numbers = <STDIN>;
my $s=0;
for ($numbers)
{
     last if $_>0;
     $s++;
}
print $s;

Последний раз редактировалось Вадим Мошев; 11.06.2015 в 21:05.
Alex irk вне форума Ответить с цитированием
Старый 11.06.2015, 21:01   #2
R71MT
Участник клуба
 
Аватар для R71MT
 
Регистрация: 16.06.2011
Сообщений: 1,428
По умолчанию

..давно перл изучал, но если память не изменяет, нужно юзать WHILE/UNTIL
В примере ниже, цикл 'while' будет выполняться до тех пор, пока переменная '$i' меньше/равно(3). Если в теле цикла создать условие, при котором $i будет всегда меньше(3) (в данном случае 1/1), то цикл будет бесконечным.

Для выхода из цикла используется оператор 'UNTIL', который привязан к 'STDIN' и будет ждать клавиш [1-->Enter]. Код не проверял, сам опробуй:
Код:
$i = 1;

while ($i <=3){
   $ends = <STDIN>;
   $a[$i] = 1/$i;
}  until $ends eq "1\n";
Нашедшего выход - затаптывают первым..
R71MT вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подскажите пожалуйста, как сделать, чтобы в Edit можно было ввести цифры от 0 до 12. ciev Общие вопросы Delphi 6 14.05.2016 17:45
как сделать чтобы можно было вводить любое число ? jeys Общие вопросы по Java, Java SE, Kotlin 4 11.04.2015 13:47
Сделать чтобы текст в edit можно было только выделять nibufep Общие вопросы Delphi 15 07.02.2015 09:49
Как в программе сделать темы оформления и чтобы их можно было изменять?! max_praime C++ Builder 2 14.04.2014 08:15
Как сделать так, чтобы форму можно было тостать не только за заголовок? Никки Общие вопросы Delphi 1 04.09.2008 14:34