Skip to content

Instantly share code, notes, and snippets.

Over the next couple of weeks I'm working on fleshing out
"job openings" and descriptions for people who want to help
advance Rakudo Perl 6. I'll write more about this in a later
post.
Following the Parrot model, one of the jobs we've already
identified is "Release Managers". These are people who have
responsibility for executing Rakudo releases according to the
release schedule. And like Parrot, we want this responsibility
to be widely spread among a team of managers, and not always fall
my $*VAR ::= 'outer';
sub foo() { say $*VAR; }
{
my *$VAR ::= 'caller';
foo();
}
my $*VAR ::= 'outer';
sub foo() {
sub bar() {
say $*VAR;
}
bar();
}
{
sub foo() {
my $*VAR ::= 'foo';
-> { say $*VAR; }
}
my $a = foo();
{
my $*VAR ::= 'outer';
sub foo() {
my $*VAR ::= 'foo';
-> { say $*VAR; }
}
my $a = foo();
{
my $*VAR ::= 'caller';
sub foo(@a, $b, $c) {
say @a<xyz>;
}
foo( (1, :xyz<2>, 3), 4, 5);
sub foo(@a, $b, $c) {
say @a.kv.perl;
}
foo( «a :xyz<b> c», 4, 5);
> 3
"noun" => Hash {
"" => PMC 'Sub' { ... },
""" => \noun[""],
"$" => PMC 'Sub' { ... },
"%" => \noun["$"],
"&" => \noun["$"],
"'" => \noun[""],
"(" => PMC 'Sub' { ... },
"0b" => \noun[""],
$ cat x
grammar ABC {
regex TOP {
abc
:my $*XYZ := 4;
<?ABCtest>
}
method ABCtest() {
$ cat x
grammar ABC {
regex TOP {
abc
:my $*XYZ := 4;
{
if $*XYZ {
say("Darnit, it's about time that we");