gistfile1.p6

role Perl5Class[$package] {                                                                                                                              
    has $.parent is rw;                                                                                                                                  
    
    Bar.^add_fallback(-> $, $ { True },                                                                                                                  
        method ($name) {                                                                                                                                 
            -> \self, |args {                                                                                                                            
                $.parent.perl5.invoke($package, $.parent.ptr, $name, self, args.list);                                                                   
            }                                                                                                                                            
        }
    );                                                                                                                                                   
}