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

constant $pi = 3.14159;
constant $msg = "Hello World";

constant @arr = (1, 2, 3, 4, 5);