say [gcd] $_=get,|[X-] (.comb X*9)xx 2