sub infix:<!*> (&f, &g) {
        return sub ($x)  {
                return f(g($x));
        };
}