RosettaCodeData/Task/Function-composition/Perl-6/function-composition.pl6

sub triple($n) { 3 * $n }
my &f = &triple ∘ &prefix:<-> ∘ { $^n + 2 };
say &f(5); # prints "-21".
Another update from ingydotnet^djgoku 2015-11-18 06:14:39 +00:00			`sub triple($n) { 3 * $n }`
June 2018 Update 2018-06-22 20:57:24 +00:00			`my &f = &triple ∘ &prefix:<-> ∘ { $^n + 2 };`
			`say &f(5); # prints "-21".`