agg.raku

class Agg does Callable {

   has Callable @.subs;
   has Signature $.signature = Signature.new: :params[|@!subs.map: |*.signature.params], :returns(Parameter.new(:type(Map())));

   method CALL-ME(|c) {
      %(
         |@.subs.map: {
            my @names = .signature.params.grep({ .named }).map(|*.named_names);
            my %params := (c.hash{@names}:p).Map;
            |.(|%params)
         }
      )
   }
}


class C {
   ::?CLASS.^add_method: "run-at", Agg.new: :subs[ sub (:$a) { :$a }, sub (:$b) { :c($b) } ]
}

say C.run-at: :1a, :2b