Nested subs are allowed in Perl 6.
sub cube($x) {
sub square($x) {
return $x * $x;
}
return $x * square($x);
}
say cube(3); # 27
The name of the inner sub square is only visible within the body of the outer sub cube.
📘 Nested subs in Raku
N. B. Perl 6 has been renamed to Raku. Click to read more.