|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : O.Melnikov 2:5020/400 25 Sep 2001 00:01:29
To : All
Subject : Hеожидающий ввод с терминала
--------------------------------------------------------------------------------
Уважаемые господа,
может кто расскажет как организовать процедуру неожидающего ввода с
терминала без эха, еще бы лучше маленький кусочек кода. Hапример, реализация
некой функции:
sub GetChar() {
my $c = shift;
if (есть ввод?) {
${$c}= полученный символ/ы
return 1; # есть таки символ
} else {
return 0; # не было введено
}
}
perldoc/man - не предлагайте, слишком там по этому вопросу не густо.
Если не составит труда, ответы продублируйте, пожалуйста,
на o.melnikov@urs.nsys.by
Всего наилучшего,
О.Мельников
--
Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Talk.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
