RosettaCodeData/Task/Enforced-immutability/Perl-6/enforced-immutability-3.pl6

my $pi := 3 + rand;