s$<.r.gs(/\w*\^(.)|x|.\d*$/){$1&&[$&.toi*t=$1.hx,:x,[:^,t-1]*t/=3]}