RosettaCodeData/Task/Pick-random-element/Perl-6/pick-random-element-1.pl6

say (1, 2, 3).pick;