pick

       Теперь rand(1000) не работает. Надо 1000.rand

	#!/usr/bin/perl6 my $rand=1000.rand; $rand.say;
	989.115628021867

       Scilicet.
       А если надо целое число? Сейчас нет int(). Можно так:

	#!/usr/bin/perl6 my $rand=(1..1000).pick; $rand.say;
	29

       А можно и иначе, очевидно.
       TODO. Найти способ сделать 1000.rand более целым.
       Оператор pick, кстати, довольно удобен.

	#!/usr/bin/perl6 say ('aaa'..'zzz').pick ~ (100..999).pick;
	mmb683

       Получилась симпатичная программа генерации паролей.
       pick лучше, чем $list[int(rand(@list))]
# mutatio postrema: 24 Aug 2010

pick, rand

charta situs

nota XXIII