13 lines
133 B
Raku
13 lines
133 B
Raku
sub a {
|
|
my $*dyn = 'a';
|
|
c();
|
|
}
|
|
sub b {
|
|
my $*dyn = 'b';
|
|
c();
|
|
}
|
|
sub c {
|
|
say $*dyn;
|
|
}
|
|
a(); # says a
|
|
b(); # says b
|