Форум программистов
 
Расширенный поиск
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

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

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

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

Помогите седлать бесконечный цикл но чтобы из него можно было выйти
Код:

print "введите любые числа:\n";
my $numbers = <STDIN>;
my $s=0;
for ($numbers)
{
     last if $_>0;
     $s++;
}
print $s;


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

..давно перл изучал, но если память не изменяет, нужно юзать 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 вне форума   Ответить с цитированием
Ответ



Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

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




10:00.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

купить трафик


как улучшить посещаемость, а также решения по монетизации сайтов, видео и приложений

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru