gistfile1.txt

            | :dba('infixed function') <?before '[' <[&\$]> <twigil>? [<alpha>|'('] > '[' ~ ']' <infix=.variable>
                                                    { $O = $<infix><O> // <O(|%additive)>; $sym = $<infix>; }



method infixish($/) {
    if $<colonpair> || $<regex_infix> {
        return Nil; # handled elsewhere
    }

    if $<infix>.reduced eq 'variable' { # ie $<infix> is a variable
        my $ast = $Operator_Function.new(function =>
            self.do_variable_reference($/, $<infix>.ast),
            :arity(2));
        self.check_variable($<infix>);
        make $ast;
    } elsif $<assign_meta_operator> {
        # TODO: there should probably be at least a potential for others

        make $<infix>.ast.meta_assign;
    } else {
        make $<infix>.ast;
    }
}