В интерактивных программах требуется читать вводимые пользователем строки. В Perl 6 для этого есть специальная функция prompt.
Она останавливает программу и ожидает, пока кто-нибудь что-нибудь напишет. Затем эта строка возвращается функцией в программу:
my $str = prompt; say $str;
prompt с аргументом
Функция prompt принимает аргумент — строку, которая будет напечатана перед тем, как начнется ввод:
my $name = prompt('Как вас зовут? > ');
say "Вас зовут $name.";
$*IN.get
Реализация функции prompt очень простая — она вызывает метод get на объекте $*IN, который по умолчанию привязан к стандартному потоку ввода STDIN. Поэтому вместо prompt можно написать более криптографичненько:
my $str = $*IN.get(); say $str;
get
Наконец, есть и просто отдельностоящая функция get, которая делает то же самое:
my $str = get(); say $str;